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Says who? Says ANSI. 

Specifically, subcommittee X3B8 of the American 
National Standards Institute (ANSI) says so. The fact 
is all Elephant™ floppies meet or exceed the specs 
required to meet or exceed all their standards. 

But just who is "subcommittee X3B8" to issue such 
pronouncements? 

They're a group of people representing a large, 
well-balanced cross section of disciplines— from 
academia, government agencies, and the computer 
industry. People from places like IBM, Hewlett-Packard, 
3M, Lawrence Livermore Labs, The U.S. Department 
of Defense, Honeywell and The Association of Com- 
puter Programmers and Analysts. In short, it's a bunch 
of high-caliber nitpickers whose mission, it seems, in 
order to make better disks for consumers, is also to 



make life miserable for everyone in the disk-making 
business. 

How? By gathering together periodically (often, 
one suspects, under the full moon) to concoct more 
and more rules to increase the quality of flexible 
disks. Their most recent rule book runs over 20 single- 
spaced pages— listing, and insisting upon— hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSI. (And thereby be taken 
seriously by people who take disks seriously.) 

In fact, if you'd like a copy of this formidable docu- 
ment, for free, just let us know and we'll send you 
one. Because once you know what it takes to make 
an Elephant for ANSI . . . 

We think you'll want us to make some Elephants 
for you. 



BEPHANlHEifY DUTY DISKS. 

For a free poster-size portrait of our powerful pachydenn, please write us. 

Distributed Exclusively by Leading Edge Products, Inc., 225 Turnpike Street, Canton, Massachusetts 02021 

Call: toll-free 1-800-343-6833; or in Massachusetts call collect (617) 828-8150. Telex 951-624. 
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WHITHER ATARI ? 



WHENCE ATARI: 

The ATARI computer has been on the market just 
over three years. In this time it has gained a 
reputation for being a very sophisticated personal 
computer with astounding graphics and unparalleled 
user-friendliness. The company has experienced, 
although at times to its detriment, a fantastic growth 
rate. In July of 1981 more ATARI computers were 
shipped than the entire year of 1980, and this figure 
was repeated in August. 

For the first year or so ATARI'S marketing direc- 
tion was unclear. All we knew was that ATARIs were 
"Computers for People." With the scrapping of the 
double density dual disk drive, ATARI Personal 
Computers became ATARI Home Computers. The 
home market became established as ATARI'S target. 
The ATARI Corporation had apparently decided to 
focus on the home and educational markets and 
leave the business market to IBM, Apple, and others. 

How has ATARI fared as a "Home" computer? 
They have set up reasonably effective Customer 
Support and User Group Support programs to aid 
consumers in their quest to become computer liter- 
ate. Part of ATARI'S problem is due to its success. 
The company is really a three-headed creature being 
comprised of the tremendously successful coin-op 
division, the video game division, and the home 
computer division. The coin-op division is by far the 
most successful financially, with the video game 
department in second, and the computer division in 
a distant third. There is, as a result, a tendency to 
market the home computer in ways similar to the 
coin-op and video divisions. Hence we have amazing- 
ly versatile and sophisticated ATARI 400 and 800 
marketed as "game machines." This is a most unfor- 
tunate situation for the computer industry in general 
and for ATARI Home Computer owners in parti- 
cular. 

MACHINE-IN-A-BOX: 

Why do 1 say that the computers are marketed as 
game machines? An understanding of recent mar- 
keting trends will make this clear. In a recent survey 
of computer retail stores, ATARI was one of the 
most frequently dropped lines. If the ATARI is such 
a great computer, why are the computer stores drop- 
ping it like hot cakes? It's because the discount re- 
tailers that carry the ATARI video game are now 
selling the ATARI 400 computer. They are selling it 
in the same way that they sell the video game: a ma- 
chine in a box. And they are being sold at heavily 
discounted prices. While this may be good for the 
consumers' pocketbook, there are some serious 
ramifications. The ATARI 400, with its flat panel 



keyboard and smaller size and price tag, can easily be 
mistaken for a video game machine. But what hap- 
pens to the 800? You guessed it! Nothing! Since the 
computer stores can't compete with the discount 
houses on the pricing of the 400, they have dropped 
the line. So one can't buy an 800 in a computer store 
very easily these days. And many discount stores 
don't carry the 800 because it's too big and too ex- 
pensive to be passed off as a video game. Where then 
can you buy the 800? Through the mail. What kind 
of support can be had with a mail-order purchase? 
Very little. 

We are beginning to see the development of an 
ironic situation whereby one of the most beautifully 
designed and easy to use personal computers, the 
ATARI 800, is getting more and more difficult to 
purchase because fewer and fewer outlets are putting 
it on their shelves. So the 800 is increasingly becom- 
ing a mail order product which, by definition, gets 
very little user support. And this is happening to a 
gompany that prides itself on building "Computers 
or People." Apple Computer's recent ban against 
mail order sales serves as an interesting counter- 
point. The company banned mail order sales because 
it felt that Apple owners weren't getting the kind of 
support they need and deserve with a mail order 
purchase. The ban has also been interpreted as a 
move by Apple to strengthen the retail computer 
stores by removing the highly discounted mail order 
pricing structure. While Apple has made some very 
bold moves to enhance its dealer program and to 
provide quality support for its product, we find 
ATARI moving in the opposite direction; encourag- 
ing discounted pricing structures and minimal to 
non-existent support. 
THE MISSING HOME COMPUTER: 

ATARI has delivered fantastic game machines in 
the 400 and 800. But where is their "Home Com- 
puter?" The "game machine" syndrome is con- 
firmed in ATARI'S software development. 

What are the five main application areas that the 
home computer is most likely to be put to use? Aside 
from games, they would be education, word pro- 
cessing, financial management, data-base manage- 
ment, and telecommunications. If the ATARI was 
not marketed primarily as a game machine, one 
would expect quality software for each of the above 
categories. Let's examine them and see what we find. 
EDUCATION: 

When the ATARI 800 was first shipped, it was 
packaged to encourage its use as an educational tool. 
Included with the computer were the 410 Program 
Recorder, a BASIC self-teaching guide, and two pro- 
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gram cartridges; the BASIC Computing Language 
and the Education System Master. The Education 
System Master Cartridge was designed to be used 
with ATARI'S "Talk & Teach" series of educational 
cassette programs. Topics included U.S. History, 
Principles of Accoundng, and Effecdve Wridng. 
Apparently the series didn't sell. 

Within a year, both the Education System Master 
Cartridge and the 410 program recorder were 
dropped from the 800's package and were replaced 
with the BASIC Reference Manual. By the start of 

1982 ATARI had dropped the endre "Talk & 
Teach" series from its software library. It seems that 
the entire series was sold to Dorset, an educational 
software house. With the "Talk & Teach" series 
deleted, the educational offerings from ATARI were 
few. There was still States and Capitals, Scram and 
Touch Typing, but nothing to compare with the 
Apple or Texas Instruments educational software 
libraries. ATARI may have plans to rectify this with 
their recent agreement with the Minnesota Educa- 
tional Computer Consortium, but for the present, 
quality educational software is in short supply. 

WORD PROCESSING 

The ATARI Word Processor, for all its merits 
(which are considerable), has a tragic flaw. It is suit- 
able for short (2-3 pages) documents but begins to 
be self defeating when used on longer ones. This is 
because it is a page oriented word processor and it 
must load in each page from disk to formatting, again 
reload each page to paginate, and then again load in 
each page for printing. Thus, it can take over half an 
hour to format, paginate and print a 16-page docu- 
ment. To make matters worse, the pagination and 
printing require the user's presence to press the 
return key at the end of every page. So one can't go 
and do something else while the half-hour marathon 
is taking place! 

PERSONAL FINANCE: 

ATARI released their Personal Financial Manage- 
ment package and then recalled it after about six 
months. It contained undocumented bugs and was 
very slow in operation. However, it did allow the 
user to maintain up over 100 budget categories, 
which made the program very flexible. I have been 
told by ATARI representatives that there are no 
plans to revise the program, however, the latest 
ATARI product catalog gives the first quarter of 

1983 as the new release date. ATARI currently 
recommends that the APX home finance programs 
be used. This is a less than ideal solution due to the 
limited scope of the user written APX financial 
programs. 

T>K\K ^NSY- M Al^ AGEMENT: 

Every personal or home computer system needs to 
have a good data-base management filing program. 
The Apple has Visifile and Personal Filing System, to 
name a few. ATARI has finally released one for its 
computer called Home Filing Manager. Being an 



electronic index card, it is easy to use and graphic- 
ally well designed. But it is also limited in that it will 
perform no arithmetic calculations and can only 
search by one field or a keyword. It is a disk based 
program which only uses 16K. Almost anyone who 
has a disk drive has at least 32K of RAM. Why limit 
it to 16K? A non-ATARI product, FileManager 800, 
uses 40K and performs arithmetic calculations, 
searches on any number of fields, has a nine-page 
record length and generates a variety of user defined 
reports. It sells for only $100. LJK's Data Perfect is 
similar in price and features. Both of these data base 
programs can be merged with a word processing pro- 
gram to create personalized letters from a mailing 
list. The only major word processor that doesn't 
have mail-merge capabilities is the ATARI Word 
Processor. 

TELECOMMUNICATIONS: 

ATARI'S telecommunications package has a 
strange and unexplainable twist to it. Originally the 
package consisted of the Telelink I and the 830 
Acoustic Modes. It was an O.K. system, the major 
drawback being that one couldn't download (save) 
any data to the disk. Telelink I does allow the 
printing out of data but it takes much longer to write 
to a printer than to a disk. This results in a higher on- 
line cost plus the disadvantage of not being able to 
retrieve the data at a later date. When Telelink II was 
announced, I for one was very excited and relieved. 1 
thought for sure it would have the save to disk fea- 
ture. 1 was preparing to enter the "Telecommunica- 
tions Age." To my amazement and disappointment, 
Telelink II also did not let one save to disk. When I 
first heard this, I couldn't believe it, so I talked to 
Customer Support at ATARI — and my fears were 
confirmed. How could they bring out a new version 
and not correct the biggest deficiency in the old.'' 

WHITHER ATARI? 

Perhaps now it is more apparent why one is forced 
to conclude that ATARI'S marketing strategy does 
not seem to take the computer seriously. Fortunately 
someone does. Each of the above categories has 
quality software from third party users. It is the 
contribution of the third party houses that has really 
made the difference as far as non-game software is 
concerned. The question that haunts me is: Why 
couldn't ATARI do the same? Lack of interest? Lack 
of time? Lack of knowledge? Poor marketing 
strategy? I don't have the answer. 

I am a proud ATARI owner who looks to ATARI 
to develop software that does justice to the hardware 
and to their "Computers for People" philosophy. 
With the advent of a new generation of low cost, 
high quality computers such as the Commodore 64, 
developing quality non-game software is a must for 
ATARI to remain competitive. The home computer 
market is definitely gaining momentum. "Compute!" 
magazine estimated that over 200,000 home com- 
puters would be sold in October '82 alone! 



GET THE MOST OUT OF YOUR ATARI COMPUTER, 
GET AN ACCESS UNLIMITED MINI-DISK DRIVE. 





Store twice as much 
information 

With an Access Unlimited drive, you 
can store almost twice as much 
information on a diskette as you can 
with an Atari 810™, 

Because our system has double- 
density storage. Which lets you store 
system and application programs on 
one diskette and still have room for 
data files. 

You save $$ 

You save on the cost of diskettes — 
because you don't need as many. 

You may also need fev\/er disk 
drives because our Access drives are 
double-density and, unlike the Atari 
810, our controller can handle up to 
4 drives. 



Furthermore, our add-on drives 
do not require their own controllers. 
They're less complicated. They cost 
less. And they're more reliable. 

Enjoy more flexibility 

Our flexible drives let you cable your 
first-drive system directly into your 
computer. Or go through an 810 drive. 
And our Access controllers auto- 
matically handle single- and double- 
density drives in the same system. 

Order today. 
Satisfaction guaranteed 

First-Drive System $649'= 

Add-On Drives $384== 

Data Separator 

for Atari 810 Drive $24== 



Try our equipment out. If you're not 
completely satisfied with it, return it 
within 15 days for a full refund. 
Write for our FREE catalog of 
accessories, software, and supplies. 

To order, call TOLL-FREE 
1 (800) 527-3475 



(^ 




VISA 


1 J 



ACCESS UNLIMITED 
Dept. A 
401 N. Central Expressway 
Richardson, Texas 75080 

(214) 690-0207 

(214) 340-5366 





What is it that will determine which of the home 
computer companies will be firmly established in 
this rapidly growing and swiftly changing market? It 
is software. It is software that ultimately makes a 
computer company a success. Witness Apple. Why 
do people continue to buy a computer that, by 
today's standards, is difficult to use and over-priced? 
The answer is software. 

It is imperative for ATARI'S survival that the 
marketing division realize this. Having demonstrated 
the ability to product high quality software for 
entertainment and games, the challenge is now to 
channel that same creativity and drive into the rest of 
the home software market. The rewards of quality 
game software have been great, and the rewards of 
quality application software will be even greater, 
both for ATARI and ATARI owners. D 



{We invite all readers, whether ATARI computer 
owners or computer store owners, to share their thoughts 
with us on the above editorial. Letters will he considered 
for publication in Issue ls!o. lo's "Reader Comment.") 



READER COMMENT 

RO. Box 23 
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CATCH 'EM IF YOU CAN- BUT DON'T GET POISONED! 

ASK FOR AAARRRGGG AT YOUR LOCAL DEALER OR ORDER 

DIRECT FOR «18.95. SPECIFY 16K CASSETTE OR 32K DISK. 

WRITE FOR OUR ILLUSTRATED LIST. 
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2005 WHITTAKER RD. YPSILANTI, MI 48197 
(313) 483-7358 



Venture into Adventure World. 



FANTASY & ADVENTURE 

crypt of the undead 23.« 

Deadly Secrets 27.^' 

Sands of Egypt Sl^' 

Ultima I 29.5= 

Ultima II 41.35 

Temple of Apshai 18.^5 

Upper Reaches of Apshai 28.«= 

ZORK I, II & III . 




Curse of RA 18.'= 

The Nightmare 23." 

O'Relly's Mine 28.^* 

Secrets of vulcans isle 25.^= 

Rosen's Brigade 2V^ 

King Arthur's Heir ea. 29." 

Dr. Goodrode's Cavern 29." 

29." 

STARCROSS 29." 

Ulysses and Golden Fleece 29." 

Wizard and the Princess 25." 



ARCADE ACTION 

Sneakers 25." 

Choplifter... ..27." 

Frogger 27." 

Claim Jumper. 23." 
Star Blazer ...25." 



Threshold 29." 

Track Attack... 24." 
Stellar Shuttle .24." 
Picnic Paranoia. 23." 



Sea Fox 24." 

Jawbreaker ...23." 

Bandits 27." 

Space Eggs ...25." 



VIDEO 
7\DVENTURES 



NEW! ROM (Fits 400 & 800 units) 

Firebird 34." Monster Maze .... 34." 

K Star Patrol 34." Pool 400 29." 

Alien Garden 34." Submarine Cmdr. . 37." 

Krazy Antiks 34." Jumbo Jet Pilot . . . 37." 



FUtlV 
GUARANTEED 



Dept. A • P.O. Box 13131, North Palm Beach, Fl 33408 • 305/627-0921 

TERMS: Cashier's check, money order, personal check (allow 3 weeks). 

Master Charge & visa add 3% • Shipping $2.00 ea. order • FL Res. add 5% sales tax. 




of The Hundreds of Reasons 
You Ought To Be A COMPUTE! 

Magazine Subscriber: 



From "The Editor's Feedback" Card, a monthly paj?t of oiir continuing 
dialogue with readers of COMPUTE!. These are responses to the question, 

"What do you like best about COMPUTE! ?" 

l."It is -written so a beginner can read and \inderstand it... it's layman. oriented..." S. 
"Clear, clean layout, good presentation..." 3. "The Atari game programs..." 4. "Best 
and most information on PET..." 5. "Cover to cover, and all in between..." 6. "Reviews 
of software and hardware..." 7. "Good balance of application and technical articles..." 
8."It is the best source of info about various levels of VIC/PET/CBM machines and ap- 
plications..." 9. "The BASIC and machine language programs..." 10,"I like programs 
that can be typed into a computer, run, and then used right away (a program without 
bugs! )..." 11, "That it is organized well, and covers a broad range of information con- 
cerning Atari. Keep it up! please, I'm learning..." 18. "Table of contents listings and 
computer guide to articles is a great idea. Best magazine for personal home com.puter 
users..." 13. "Best I have found for VIC info..." 14. "Informative articles: 'Secrets of 
Atari', Game programs, especially programs that teach the reader about the Atari..." 
15. "I like all the articles and programs for my computer, the PET. I've learned and 
found out things about it that I never even thought existed. Other magazines don't 
have too much material for the PET and, for that reason, I find COMPUTE! invaluable..." 
16."The up-to-date hardware reviews..." 17. "Machine language utilities for Atari..." 
18."Articles are terse but understandable and accurate. Utility and applications pro- 
gram listings very helpful..." 19. "The April, '82 issue is my first. I am impressed that 
you not only acknowledge the VIC-SO, you even have applications for it..." 20."I really 
enjoy (since I am one) the Beginner's Page..." 81. "The attention it gives to Atari and 
the easy-to-understand language it's written in..." 88. "It is concerned with ex- 
plaining programs, not just listing them. It is the best VIC magazine I coiild buy..." 
83."The new table of contents 'Guide to Articles and Programs' is excellent, particu- 
larly the indication of 'miiltiple computer' items..." 84."Broad range (sophistication) 
of prograjns..." 85. "You don't speak over the average user's head..." 

Whether you're just getting started with, personal computers, or very advanced, you'll 
find useful, helpful information In every issue of COMPUTE! Magazine. We specialize in 
supporting the Atari, PET/CBM, VIC-20, and Apple computers. Editorial coverage is 
expanding to include the TI-99/4A, the Sinclair ZX-81, and the Radio Shack Color Computer. 

Every issue of COMPUTE! brings you user-friendly articles, applications programs, and 
utilities you can type right into your computer and use. To subscribe to COMPUTE!, or to 
order a sam.ple issue, use the attached reply card or call our toll-free number. COMPUTE!... 
We're the resource for thousands and thousands of home, educational, and small business 
computer users. Shoioldn't you be one of them? 

1 year, twelve issue subscription: $20.00 in the US. 



Call Toll Free in tlie US 800-334-0868 

In irc caU 919-875-9809 

COMPUTEI Magazine is a publication of Small System Services, Inc. 
625 Fulton Street. P.O. Box 5406. Greensboro, NO 27403. 
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READER COMMENT 



Dear Sirs, 

Permit me to introduce a rather 
unique ATARI users' group to 
you. We are known as the ATARI 
Microcomputer Network. We are 
an on-the-air users' group of ama- 
teur (ham) radio operators and 
short wave listeners who are 
ATARI computer enthusiasts. 

We produce a bi-monthly jour- 
nal known as "Ad Astra...," 
(L. "To the Stars..."), and we 
are proud of it indeed. Presently 
we have over 200 members cover- 
ing the entire U.S., Canada, South 
America, Europe and the far east. 
Because of the very nature of ham 
radio, many of the articles pro- 
duced in "Ad Astra. . ." are of a 
technical nature, though seeming- 
ly complex to many people, they 
are easily understood by most 
hams. 

Sincerely, 

Jack McKirgan II, WD8BNG 

National Net Coordinator 

THE ATARI 

MICROCOMPUTER 

NETWORK 

Jack McKirgan II, WD8BNG 

4749 S.R. 207 N.E. 

Washington C.H., Ohio 43 160 

(614) 869-3597 



Gentlemen: 

I was extremely gratified to see 
my article and program ("Color 
Graphics in Mode 0" and "Color 
Slot Machine") appear in issue 
#8. I was also greatly pleased to 
read the kind words written by 
Mr. Henry L. Smith when he 
spoke of my previous program, 
"Triple Threat Dice." 

The article about using 
artifacting to get colors in GR.O 
was written before I had a GTIA 
chip installed in my computer. I 
have read later that the artifacts 



are different but this is the first 
time I have seen this 
demonstrated. With the GTIA 
chip the red and blue effects 
mentioned are reversed from 
what the CTIA chip displays. It is 
for this reason that the game 
which was developed on a CTIA 
machine will look strange on a 
GTIA equipped machine. The 
cherries will be more like 
blueberries while the oranges and 
plums will be reversed in color. 
Everything about the game still 
plays and pays the same, it only 
looks funny. 

Sincerely, 

Michael A. Ivins 

Cheyenne, WY 



Dear A.N.A.L.O.G., 

I would like to congratulate you 
for the great magazine you have 
created. I've had my ATARI 800 
for about a year and have found 
your articles to be very helpful. 
Your reviews and program listings 
are also great. 

Just a couple of days ago, I 
realized that I bought my 
computer for programming, not 
gaming. In my attempts to create 
some useful programs, I was very 
disappointed when I discovered 
that there is a limit to the amount 
of data that can be inputted into a 
string (about three full lines). In 
search of a solution, I found out 
that there is a way to exceed the 
limit using the GET command 
and substrings. Here is my 
subroutine: 



1 OPEN ttl,4,0,"K:":REM OPE 

M5 KEYBOARD FOR INPUT 

18 DIM Q£(1006):REH SET UP 

STRING flREft 
20 NUM=0:REM IMITIALIZE CO 
UNTER 
30 GOSUB 10e:REM IHPUT THE 

STRING 
40 PRINT A$:REM PRINT THE 
STRING 
50 GOTO 20: REM DO IT AGAIN 



lee REM *tt* LONG INPUT SUB 
ROUTINE *** 
185 AS="" 

lie GET ni,A:REM PLACES TH 
E ATASCII VALUE OF THE KEY 
PRESSED INTO A 

115 IF A<>12e THEN 13e:REH 
CHECKS FOR THE DELETE KEY 

116 IF NUM=e THEN 118: REN 
CAN'T DELETE ANYTHING 

117 NUM=NUM-l:IF NUN=e THE 

N AS= GOTO 160: REM CHECK 

S FOR ZERO STRING LENGTH 
120 A5=A$C1,NUM} SGOTO 166: 
REM DELETE THE LAST CHARAC 
TER 

158 IF A=155 THEN ? :RETUR 

N :REN CHECKS FOR RETURN K 

EY 

140 NUM=NUN41 

150 A$(NUM}=CHR5CA} 

168 ? CHR$CA3;:REN SHOH CH 

ARACTERS AS THEY ARE TYPED 

178 GOTO 110 



I admit, it is long. But it is handy 
for people who need to put a lot of 
information into one string. 

Thank you and keep up the 
good work. 

Danny Halevy 



Jamaica, New York 



Dear Editor: 

For those interested in POKE 
graphics, the following program 
displays the broad selection of 
colors and patterns available in 
hi-res. A is the value of the 
beginning of the screen in the 
upper left corner. Through 
experimentation the POKE 
numbers for the colors red, white, 
and blue can be found but the 
other colors don't seem to follow 
any logical pattern. 

Brian Clausen 

San Jose, California 



TRAP 3 

1 GRAPHICS 8:P0KE 718^0:P0 
KE 709,255:P0KE 752,1:A=PE 
EK C560) +PEEK C561)»256+256 

2 FOR K=A TO A+6399 STEP 4 
0:FOR V=0 TO 3:9:P0KE K + Y,Z 
:HEKT Y:Z=Z+l:? Z:NEKT X:G 
OTO 1 

3 END 



Sit Back With 

Sidewriter 




The Auxiliary 

Keyboard for the 

''Atari 400 or 

800'% which gives 

you the advantage 

of a Portable full 

stroke keyboard. 




F^^^^^ 





Whether you use the Sidewriter as a second point 
of entry or you just wish to sit back with your 
feet up, the Sidewriter goes where you go to give 
you the most from your Atari computer. 



FOR INFORMATION 
CONTACT: 



DEALER 

INQUIRIES 

INVITED 



TT^T 



14416 S. OUTER 40 RD. 

CHESTERFIELD, MO. 63017 

(314) 434-0433 



INC. 



Or at these 
local dealers: 



Quality Technology 

741 South State St. 

Salt Lake City, Utah 84111 

801-521-5040 



Madison Books & Computer 

8006-13 Madison Pike 

Madison, Alabama 35758 

205-772-9250 

Compu-Ploy 

33310 Pacific Highway S. 

Federal Way, Wash. 98003 

206-838-9570 



Tesco 

9237 Roosevelt Blvd. 

Philadelphia, PA 19114 

215-677-5000 

Instant Replay 
14422-24 S. Outer 40 Rd. 
Chesterfield, Mo. 63017 

314-576-0544 



The Computer Shop 

702 S. Michigan St. 

South Bend, Indiana 46618 

219-232-9918 

Micro Computers 

265 S. King Street 

Honolulu, Hawaii 96826 

808-946-1733 



A. I. Computer Center 

178 Oxford Rd. 

Fern Park, Florida 32730 

305-334-8914 

Kobe Computer Cottage Ltd. 

12913 A. 97th St. 

Edmunton, Alberta, Canada 

403-478-6143 



Rite Way Enterprises 

8262 12 MUe Rd. 

Warren Michigan 48093 

313-751-2454 

Computer Image 

10061 Sunset Dr. 

Miami, Florida 33173 

305-271-1224 
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CONSOLE BUTTON SUBROUTINE 



CASSETTE OR DISK 16K 



by Jerry White 



The ATARI BASIC Reference Manual describes 
decimal location 53279 as, "Console switches (bit 
2= Option; bit 1= Select; bit 0= Start. POKE 
53279,0 before reading. 0=switch pressed.) 

The would-be BASIC programmer has got to be a 
bit confused after reading the above. In BASIC, you 
normally don't think about bit settings, and the 
beginner has a long way to go before he or she will 
have to worry about such things. 

The point is that a BASIC PEEK (53279) will tell 
you which console buttons, if any, are pressed. You 
can see how pressing one or more buttons changes 
the value of that location with a one line program. 
Enter line 10 below then type RUN and RETURN. 
Watch the screen as you press the various console 
buttons, then press BREAK to abort. 

10 ? PEEK (53279):GOTO 10 

Now for a somewhat more useful demonstration, 
enter the CONSOLE BUTTON SUBROUTINE. 
Note that although it is a subroutine, it has been set 
up so that it will run without any additional code. Of 
course you could access it from your own program 
with a GOTO 30000. 

This routine provides the user with three options. 
It will allow you to RERUN THIS PROGRAM, (the 
program currently in RAM), RETURN TO BASIC, 
(which is a fancy way to say END), or RUN A 
MENU PROGRAM from diskette. Naturally, you 
could change these options to whatever your own 
program requires. The START button is used to 
execute the option that is currently displayed using 
inverse video. Pressing the OPTION or SELECT 
buttons will change the previously highlighted 
option back to normal video and highlight the next 
option. When the desired option is highlighted, the 
START button is used to say, "DO IT". 

Since this should be a routine you will modify and 
include in many of your own programs, it should be 
LISTed onto cassette (LIST"C:") or disk (LIST"D: 
BUTTON.LST",30000,30170). When you want 
to include it as part of your own program currently 
in RAM, ENTER"C": from cassette or 
ENTER"D;BUTTON.LST" from disk. □ 



REH CONSOLE BUTTON SUBROUTINE 

1 REM BY JERRY WHITE 6/5/82 

30000 GRfiPHlCS O'.POKE 752,1: POKE 710,4 

8:P0KE 82,2:P0KE 201,9 

30010 ? "■»5+4* use the HaaaaS or i.1=m»ii 
button to":? :? " highlight your choi 
ce below, then" 



30020 ? :? "^ press the 30033 button." 

:FOR ME=0 TO 8: POKE 53275, HE : NEXT ME : G 

OSUB 3Oie0:5EL=ll 

30030 POSITION SEL,SEL:? " l;l=<JU:ii!fcf j 

aaaasc" t^m,„T^m^ 

30040 BUTTON^PEEK 153279) : IF BUTT0N=7 T 

HEN 30040 

30050 GOSUB 30140: IF CHOICE-6 THEN 301 

10 

30060 5EL=SEL+2:IF SEL>15 THEN SEL=11: 

GOSUB 30100 :GOTO 30030 

30070 IF SEL-1 3 THEN GOSUB 3 8100;P0SIT 

ION 11,5EL:? " l:]^<II:r»iiM:T!l.-»<^ " : GOTO 30 

040 

30080 IF SEL:=15 TH EN GOSU B 3ei e0:P0SIT 

ION ii,sel:? -IJiUJKaiUllMiHMI" : goto 3 

0040 

30090 GOTO 30040 

30100 POSITION 11,11:? "RERUN THIS PRO 

GROM":? :? , "RETURN TO BASIC":? :? , "R 

UN MENU PROGRAM": RETURN 

30110 TRAP 30eO0:POKE 281,10:IF 5EL=15 

THEN ? "H":? :? , "LOADING MENU": RUN " 
D: MENU": TRAP 40000 

30120 IF 5EL=13 THEN GRAPHICS 0:? :? " 
BASIC":? "IS"j:P0KE 752,0:TRAP 408eO:E 
ND 

30130 TRAP 40000: RUN 
30140 GOSUB 30170 

30150 CH0ICE=BUTTON:BUTT0N=PEEK €53279) 
:IF BUTT0HO7 THEN 30150 
30160 GOSUB 30170:RETURN 
30170 FOR ME=0 TO 8: POKE 53279, ME : NEKT 

ME: RETURN 



DrCHECK DATA (see p. 29) 

DATA 874,371,472,424,670,977,191,760 
,692,708,187,6,215,488,359,7394 
30130 DATA 746,232,297,271,717,2263 



WANT 

TO 

SUBSCRIBE? 

CALL 

TOLL FREE 

1-800-345-8112 

In Penna. 1-800-662-2444 



/^^F^ ll^elcortierTHORN EMI & Spinnaker 

"r^"^ / ^®w Software Companies for the Atari 400f 800 



w 



^ 




From THORN EMI 

A Batch of British Favorites, From Children's 
Games to Sophisticated Simuiations 



SUBMARINE 
COMMANDER 

From THORN EMI 

Your mission: destroy all enemy merchant shipping In 
the Mediterranean. Locate enemy ships using your 
Sonar and periscope, attacking when they're within 
firing range. But watch your instrument panel careful- 
ly to monitor your fuel, oxygen, battery charge and 
Sonar levels, so you'll be ready for instant action— 
diving to avoid enemy depth charges, or firing your 
own. 

ROM Cartridge, $49ar Save 15% 

Now Thru Dec. 31, You Pay Only $42.46 





DARTS 



From THORN EMI 

The traditional pubroom game of darts, depicted in 

strikingly beautiful graphics and sound. Use your 

joystick to position the thrower's hand— 10 sklli 

levels allow for all ages of players. Once thrown, the 

dart either finds Its mark or bounces off the wire 

separators (with a realistic "clink" sound). 

1 to 4 players including the computer, if you like. 

16K Tape, S2»;96 jave 15* 

Now Thru Dec. 31 You Pay Only $25.46 



CRIBBAGE 
& DOMINOES 




From THORN EM! 

Challenge your computer to a game of either of these 
favorites. At first, the computer may leave you far 
behind, but you'll even the score as you work out and 
try new strategies. Great way to practice and^surprise 
your friends. 

16K Tape, $29.95 /W 

POOL 

From THORN EMI 
Great action simulation of the game, with 3 varia- 
tions: Tournament, 8-Ball and Practice Pool, Play 
against a friend or the computer, using your joystick 
to maneuver your "cue stick". With instruction 
booklet for beginners. Requires joystick. 

16K Tape, $29.95 





SNOOKER 
& BILLIARDS 



From THORN EMI 

Great way to learn or practice your technique with the 
computer. Then, when you're an "accomplished" 
player, challenge your friends to a few matches. Full 
joystick control for angle and strength of each shot. 
Fun for beginners and advanced players; 4 game 
variations. Requires joystick. 

16K Tape, $29.95 



JUMBO JET 
PILOT 



From THORN EMi 

You're the ptiot in this sophtsticated flight simulation, 
with full instrument panel plus views ttirough the 
cockpit windows. You'il take off, navigate to your re- 
quired destination, then land safely. Once you've 
mastered the basics, try your hand at the "extras": 
can you fly upside down? Loop the loop? At the end of 
each "flight", the computer rates your performance. 
10 game variations. Requires joystick. 

ROM Cartridge, 549:95 Save 15* 

Now Thru Dec. 31, You Pay Only $42.46 



HUMPTY 
DUMPTY & 
JACK & JILL 




From THORN EMI 
A new twist on an old favorite: "jigsaw" puzzles for 
the whole family! The picture of each nursery rhyme 
theme is shown on the computer screen-divided into 
9, 16, 25 or 36 squares, with choice of difficulty levels. 
The computer jumbles up the picture by moving the 
squares around, and you have to put them back 
together again. 48 game variations to delight 
everyone from pre-school children to adults. Only 1 
player at a time, please. 
16K Tape, $29.95 

Also available: 

HICKORY DICKORY DOCK 
BAA BAA BLACK SHEEP 

16K Tape, $29.95 



SNOOPER 
TROOPS 




From Spinnaker 

Deiightful Collection of Children's Programs 
That Teach As They Enchant.^ 



PACEMAKER 

From Spinnaker 



By Tom Snyder from Spinnaker 
As a Snooper Trooper, you're a detective assigned to 
solve mysteries. You drive around town in your Snoop- 
Mobile, with wrist radio, SnoopNet computer, camera 
for SnoopShots, and notebook. Full color graphics 
and sound. 

Case #1 : The Granite Point Ghost 
Someone is trying to scare the Kim family. Who— or 
What? And Why? Ages 10 to adult. 

48K Disk, $44.95 

Case #2: The Disappearing Dolphin 

Someone Stole Lily the Dolphin from the Tabasco 

Aquarium. Can you find her? Ages 10 to adult. 

48K Disk, $44.95 




STORY 



From Spinnaker 
Imaginative teaching tool that encourages young 
children to write sentences and stories of their own as 
the computer acfs them out! They must become 
familiar with the computer keyboard and use the 
38-word vocabulary list correctly. (The computer will 
not accept incorrect grammar). As they type, the com- 
puter shows their words in action. Delightful and 
motivational. Ages 5 to 9. 

48K Disk, $34.95 



f Clever and fun introduction to computer programming 
and keyboard familiarity. In game 1, the child com- 
pletes a blank face, choosing from sets of eyes, ears, 
noses. Game 2 starts with completed face. Child 
enters instructions to make face smile, wink, wiggle 
its ears. Game 3 presents sequences of faces which 
the child must reproduce in correct order. Full color 
graphics and sound. Ages 4 to 8. 
48K Disk, $34.95 



CHRISTMAS SAMPLER 

From Spinnaker 

Great holiday package that brings the classics "to 
life" with full color graphics and sound, interspersed 
with animation. Stories are told, plus a selection of 
Christmas carols, accompanied by screen texts that 
are easy to follow. Christmas music is the 3rd ingre- 
dient—perfect for family gatherings. 

48K Disk, $29:95 



Over 1 500 Programs for TRS-80, 



For Information Call 
202-363-9797 

Visit our other stores: 

829 Bethel Rd., Columbus OH 

Seven Corners Center, Falls Church, VA 

W. Bell Plaza, 6600 Security Blvd., Baltimore MD 



PROGRRm 
/TOR£tm 



Save 20% 

Now Thru Dec. 31, You Pay Only $23.96 



ATARI 400/800, APPLE & IBM. 



To Order Call Toll-Free 



800-424-2738 1^ 



MAIL ORDERS: Send check or M.O. for total purchase 
price, plus $2.00 postage & handling. D.C., MD. & VA.: add 
sales tax. Charge cards: include all embossed information 
on the card. 



4200 Wisconsin Avenue, NW, Dept. A21 2 Box 9582 Washington, D.C. 2001 6 
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Atari Holiday Reading 



YOUR 
ATARI 
COMPUTER 




PftOGRAm 
/T0R6,„ 




By Poole, McNiff & Cook from Osborne/McGraw-Hill 
Comprehensive, all-in-one guide for Atari 400/800 
computers that is helpful to the beginning and ad- 
vanced programmer. Complete operating instruc- 
tions; detailed BASIC programming, including a 
handy alphabetical glossary of BASIC statements 
and functions; advanced BASIC; computer graphics; 
and tips on hardware, peripherals and compatible 
software. 
Softcover, $16.95 

COMPUTirS 
SECOND BOOK 
OF ATARI 

From Compute! Books 
An all naw collection of n«v«r-before published 
articles on the Atari for beginner to advanced users. 
Topics include: Utilities, Programming, Graphics, 
Applications and Beyond BASIC. 

Spiral-bound, $12.95 

GAMES & 
RECREATIONS 

From Reston 

This new book is packed with games and ideas on 

how to create your own. You'll discover the special 

Atari capabilities of the keyboard, graphics, sound 

and color. The book provides an entertaining way to 

learn more about general programming, too. 

Part I: Learning Through Games. Part II: Games for 

the Atari. Part III: The Atari Special. Plus seven 

appendices. 

Softcover, $14.95 Hardcover, $19.95 

MASTER MEMORY MAP 

From Santa Cruz Software 

If you are serious about programming the Atari, this 
booklet could become one of your most important 
tools. A highly detailed map of the Atari's memory, it 
details thousands of locations and routines. Using 
this booklet makes easier the use of display list, 
player/missile, and interrupt graphics. The "Miscel- 
laneous Notes" section contains a wealth of knowl- 
edge picked up by Santa Cruz in their explorations of 
the Atari. Also included are notes on the new GTIA 
graphics chip. 

Softcover, $6.95 





VISICALC 
HOME AND 
OFFICE 
COMPANION 

By Castlewitz and Chisausky 
from Osborne/McGraw Hill 
■ Fifty VisiCalc models for home and office, including: 
investments, inventory, sales forecasts, payroll, per- 
sonal net v^orth, home budget planning, family in- 
surance needs. Each comes with model listings, 
sample printed reports and narrative. 

Softcover, $15.95 




6502 

ASSEMBLY 
LANGUAGE 
SUBROUTINES 

By Leventhal and Saville from Osborne/McGraw-Hill 
If you're interested in using assembly language 
quickly, this book is ideal. It describes general 6502 
programming methods, provides code for more than 
40 subroutines to help you improve your program- 
ming skills, debug or revise an existing program; add 
instructions and addressing modes. 

Softcover, $15.95 



ATARI 
SOUND 
AND 
GRAPHICS 

By Moore, Lower and Albrecht from John Wiley 
This self-paced, self-teaching guide will have you 
seeing and hearing things on your Atari in no time- 
even if you're a complete beginner. You'll learn to 
compose and play melodies, draw cartoons, create 
sound effects and games. Each section teaches 
something new in BASIC, the most commonly used 
computer language. 

Softcover, $9.95 




PICTURE THIS! 

An Introduction to 
Computer Graphics 
for Kids of All Ages 



PICTURE THIS! 



OEl 



By David D. Thornburg from Addison-Wesley 
This book promises to become the "modern replace- 
ment for coloring books and crayons". It's a learn-by- 
doing manual that uses PILOT, a simpler language 
than BASIC, and Turtle Geometry to teach kids to 
create pictures in full color from simple lines to com- 
plex angles and curves. Recommended for use in 
conjunction with PILOT Cartridge. 

Spiral-bound, $14.95 



the CSEHI 
Assembler 



/ -gmfrf'tn-x 



ATARI 
ASSEMBLER 

By Don & Kurt Inman from Reston 
While the Atari Assembler Cartridge comes with an 
operating manual, it assumes that you already know 
assembly language. If you're new to the Atari or its 
6502 processor, this book is a must. The Inmans 
guide you through the rudiments of this fascinating 
type of programming in clear, easy steps. Includes 
full listing and description of 6502 mnemonics and 
addressing modes. Recommended for use in con- 
junction with Assembler Cartridge. 
Softcover, $12.95 




INSIDE 
ATARI DOS 

By Bill Wilkinson from Compute 
The comprehensive manual on the disk File Manager 
System (FMS), commonly known as Atari DOS 2.08. 
Contains the only complete and official listing for 
the system, plus a full description of: the external 
view, charts & tables, various interfaces and func- 
tions of individual subroutines. 

Spiral-bound, $19.95 




DERE 
ATARI 

From APX 

Translated from Latin, ttie title of ttiis bool< is "All 
About Atari" and it means wtiat it says! Used in 
combination witti Atari's Tectinicai Reference 
Manual, advanced programmers will be able to learn 
to exploit ttie many hardware and operating system 
features ttiat mal(e ttie Atari 400/800 so tremendous- 
ly versatile. Includes a useful discussion of ttie new/ 
GTiA ctiip. Once you know Atari BASIC and 
assembler, this book is a must.- 

Loose leaf 

(binder not supplied), 

$19.95 



COMPUTERS 
FOR KIDS 




Atari Edition By Sally Larsen from Creative 
The BASIC programming manual written for kids, 
from flowcharts to color graphics, including the 
sure-to-p lease program, "Scare Mom with an Ele- 
phant." Detailed instructions and sketches plus 
glossary of statements and commands. With lesson 
plans and tips for parents and teachers. 

Softcover, $4.95 



STIMULATING 
SIMULATIONS, 

Atari Version, 
2nd Edition 

By C.W. Engel from Hayden 
A handbook of 12 simulation games including Art 
Auction, Starship Alpha, f^onster Chase and Devil's 
Dungeon — each complete with listing, sample run, 
instructions and program documentation, including 
flowchart and ideas for variations. 

Softcover, $5.95 




THE PROGRAM STORE • Dept. A212 • Box 9582 • 4200 Wisconsin Avenue, NW • Washington, D.C. 20016 1 



I Item 



Tape/Disl</Bool< 



Price Postage 
Total 



$2.00 



Name_ 



I 



D CHECK 

D MASTERCARD 



Address_ 

□ VISA City 



. State. 



Zip. 



Gard#_ 



Exp_ 






Orders Must Be Received By December 10th for Christmas Delivery 
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SOFTWARE REVIEW: 
MINER 2049er 

Big Five Software 

P.O. Box 9078-185 

Van Nuys, CA 91409 

16K ROM Cartridge $49.95 



by Tom Hudson 



When one has worked with a computer magazine 
long enough, one starts to look at incoming software 
with a more critical eye. After all, there is a limit to 
how many Space Invaders or Pac Man clones a 
person can take. When the review copy of Miner 
2049er arrived at A.N.A.L.O.G., I don't think 
anyone was expecting much in the way of innovative 
gaming. We were wrong. 

The first thing that caught our attention was that 
Miner 2049er was a ROM cartridge. Upon closer 
examination, it was discovered that this was no 
ordinary ROM cartridge, but a 16K ROM cartridge. 

For those of you unfamiliar with the ATARI 
400/800 cartridge system, the fact is that such games 
as STAR RAIDERS (TM) and MISSILE 
COMMAND (TM) are 8K programs placed in 
Read-Only Memory chips. In the last few weeks we 
have received several new cartridge games, most of 
which are 8K, and quite frankly, they LOOK like 4K 
games. 

Miner 2049er, on the other hand, has the quality 
look that usually requires large amounts of memory. 
Actually, I have a hard time believing that Big 5 
software was able to fit Miner 2049er into 16K. 
Luckily for ATARI users, they did. 

THE GAME 

In Miner 2049er, you play the part of "Bounty 
Bob," a futuristic miner. The object of the game is to 
claim as many mining stations as possible. You do 
this by walking, jumping, climbing and sliding your 
way through each of the ten stations. If you think 
that only ten stations may not be much of a 
challenge, think again. For each station, there are ten 
difficulty levels, or "zones." Play progresses from 
Station 1, Zone 1 to Station 10, Zone 1 then to 
Station 1, Zone 2, etc. All told, there are 100 levels of 
difficulty. 

Each station is made up of sections of framework, 
connected by ladders (which allow up and down 
movement) and slides (allowing uncontrolled 
downward movement). Some stations have moving 
platforms, elevators, pulverizers, radioactive waste, 
and even futuristic transporters, which "beam" 
Bounty Bob to various levels. The most outlandish 
device is a cannon which you must use to shoot 
yourself to various levels of framework! Each station 



must be completed in a stated time interval shown at 
the top of the screen. If Bounty Bob does not claim 
the entire station before time runs out, he is 
destroyed. On the other hand, he is rewarded with 
bonus points if he claims the station with time left 
over. 

Some stations are designed to test Bounty Bob's 
jumping ability. With no other way to get around. 
Bob must jump across large gaps in the framework in 
order to claim the whole station. 

Of course, no game is complete without the obliga- 
tory antagonist. In Miner 2049er, this part is 
played by a number of "mutant organisms", which 
stroll around each mime station. Contact with these 
organisms results in the instant destruction of 
Bounty Bob. Bob's only defense against these 
creatures is in the form of various articles strewn 
about the mine. These can be shovels, pickaxes, 
detonators, and many other items. By picking up 
these items. Bounty Bob has the temporary power to 
destroy the mutants. In addition, he is awarded 
bonus points for picking up each object. 

Miner 2049er is one of those rare games which 
looks as if it were designed, not just thrown together. 
The bonus items in the mine aren't just one-color 
graphics, but detailed, multicolor objects. Bounty 
Bob isn't just a single color player but is detailed with 
four colors, and even changes his facial expression 
depending on what he is doing. The game itself was 
not abandoned in favor of graphics, either. With 100 
levels of difficulty, the challenge will still be there, 
even after months of play. This is an important 
consideration when buying a cartridge, a relatively 
large investment. 

Miner 2049er is a must-play game for the 
ATARI 400/800 computers. D 




MINER 2049er 




1' 



€.ompu tr/thi Ll t 
p»cebent^ the QYewett in 



SUPER SPECIALS 



GORF 

$29.95 cartridge 



KICKBACKl 
$34.95 cartridgi 



JUMBO JET PILOT 
$34.95 cartridge 



WIZARD OF WOR ■ SOCCER m^SUBMARINE COMMANDER 

$29.95 cartridge jf $34.95 cartridge ^^ $34.95 cartridge ^ 

Prices effective Januaiy 1 through January 31, 1983 ^ 



Buy any 3 programs and receive a FREE* SLIK STIK 



ATARI 

CONVERSATIONAL 

LANGUAGES-T 43,95 

INVITATION TO 
PROGRAMMING 2&3-T ... 21.95 

MUSIC COMPOSER -C 32.95 

MY FIRST ALPHABET -D ... 28.95 

TOUCHTYPING • T 18.95 

WORD PROCESSOR -D ... 112,95 

BOOKKEEPER - D 112.95 

HOME FILING MANAGER D 37,95 

MAIUNGUST-T 18.95 

ASTEROIDS-C 26.95 

CAVERNS OF MARS - D 28,95 

COMPUTER CHESS ■ C 26.95 



MISSILE COMMAND -C .... 26.95 

SPACE INVADERS - C 26.95 

SUPER BREAKOUT -C 26.95 

STARRAIDERSC 32.95 

ASSEMBLY EDITOR - C 44.95 

BASIC-C 44.95 

MACROASSEMBLER - D . . . . 65.95 

MICROSOFT BASIC D 65.95 

PILOT (HOME PACKAGE) -C .58.95 

ADVENTURE INTERNATIONAL 

REARGUARD-D 20.95 

PREPPIED/T 23.95 

S.A.G. A. ADVENTURES -D .23.95 

ANALOG 

RACE IN SPACE - D/T 20.95 

CARNIVAL-D/T 20,95 

SUNDAY DRIVER D/T 23.95 

CRASH DIVE! -D/T 23.95 

BIG FIVE ^ ^. , 

COAL MINER 2049'ER- Cart . 39.95 D - DlSK 



APX 

ALL ITEMS - 20% OFF RETAIL, WE 

CARRY THE ENTIRE APX 

CATALOG! 

AUTOMATED SIMULATIONS 

TEMPLE OF APSHAI- D/T... 31.95 

UPPER REACHES OF 

APSHAID/T 16,95 

CRUSH, CRUMBLE & 

CHOMP-D/T 23.95 

RICOCHET-D/T 16.95 

CRYPT OF TFIE 

UNDEAD-D 23.95 

ARMOR ASSAULT D 31.95 

DRAGON'S EYE D 23.95 

ESCAPE FROM VULCAN'S 

ISLE-D 23.95 

KING ARTHUR'S HEIR • D ... 23,95 

MONSTER MAZE -Cart 31,95 

PLATTERMANIA ■ Cart 31,95 

THE NIGHTMARE - D 23,95 

DATASOFT 

SHOOTING ARCADE -DA . 23.95 

PACIFIC COAST 

HIGHWAY-D/T 23.95 

CLOWNS & 

BALLOONS-D/T 23.95 

MICROPAINTER - D 27.95 

CANYON CUMBER - D/T . . . 23.95 

FATHOMS FORTY ■ D 27.95 

O'RILEY'S MINE - D/T 27,95 

ROSEN'S BRIGADE -D/T ... 27.95 

SANDS OF EGYPT -D 31.95 

SPELL WIZARDD 63.95 



BRODERBUND 

APPLEPANIC-D/T 

STELLAR SHUTTLE - D/T . . . 
DAVID'S MIDNIGHT 

MAGIC D 

STAR BLAZER D 

TRACKATTACKD 

LABYRINTHD/T 

SERPENTINED 

DUELING DIGITS ■ D 

DEADLY SECRETS - D 

CHOPLIFTER-D 

GENETIC DRIFT -DAT 

SEAFOXD 

COSMI 

fiCZJEC CHALLENGER - D . . . 
AZTEC CHALLENGER T . . . 
CRYPTS OF PLUMBOUS - D 
CRYPTS OF PLUMBOUS - T . 
GALACTIC AVENGER - D . . . 
G AIjOiCTIC AVENGER - T . . . 

SPIDER INVASION -D 

SPIDER INVASION -T 

FIRST STAR 

ASTRO CHASE D/T . 
ON-UNE 
JAWBREAKER -D/T... 

ULTIMAI-D 

CROSSFIRE -D/T 

THRESHOLDD 

ULTIMAII-D 

MOUSKATTACK - D .. 
FROGGER-D/T 



23.95 
23,95 

27,95 
25,50 
23,95 
23.95 
23.95 
23,95 
27.95 
27.95 
23.95 
23.95 

16.95 

11.95 

13.95 

. 8.95 

13.95 

,, 8,95 

, 16.95 

. 11.95 

. 23.95 

23.95 
, 31,95 
23,95 
31,95 
44,95 
27.95 
27,95 



•COUPON PROGRAM 

The purchase of each program {with the 
exception of Super Specials, Atari and APX) 
will earn you 1 COMPUTABILUY DIVI- 
DEND COUPON, Save 3 coupons and re- 
deem them for your choice of Slik Stik, a 
Lefty Adaptor, or an Extension Cable, You 
pay only a $2,50 shipping& handling charge. 



T - Cassette 



C - Cartridge 



WE CARRY HUNDREDS OF ITEMS FOR ATARI 400/800, ASK FOR OUR FREE CATALOG. 



I.D.S.I. 

POOL1.5-D 27.95 

POOL400-Cart 31.95 

SPEEDWAY BLAST Cart ... 31.95 

ROKLAN 

DELUXE INVADERS Cart .. 31.95 

GORFCart 35,95 

WIZARD OF WOR - Cart 35,95 

SENTIENT 

CYBORGD 27,95 

GOLDRUSHD/T 27,95 

SIRIUS 

SNAKEBYTE-D 23.95 

SPACEEGGS-D 23.95 

CYCLOD-D 23.95 

SNEAKERS-D 23.95 

BANDITS-D 27.95 

WAYOUT-D 31.95 

SYNAPSE 

PROTECTOR - D/T 23.95 

SLIME- D/T 23.95 

SHAMUS-D/T 23.95 

FORT APOCALYPSE -D/T .. 23,95 

CLAIM JUMPER - D/T 27,95 

NAUTILUS-D/T 23.95 

PICNIC PARANOIA - D/T .... 27,95 

RAPTILIAN-D/T 27.95 

ATARI is a trademark of ATARI, Inc, 



^txirfightGr 



The Ultimate Joystick 

• 2 Year Warranty 

• More Accurate *.- ^ q — 

• Easier 10 Hold 'lO.yD 

LEFTY JOYSTICK ADAPTOR 

Adapts to any Atari Joystick. 

Moves fire button to top Righl, '*^,^0 




SUKSTIK 

• 90 Day Warranty 

• Easy Ball Top 
Control. 




$9.95 

EXTENSION CABLE (5 ft.) 

Adapts to anv Atari controller- 

AU. JOYSTICKS WORK WITH Alan VCS. Scirs Telcgamc , Commodore VIC 20, Alan 400 800 (All products haul- registered trademarks) 

30 Day Money Back Guarantee on all Suncom Products 



PERCOM D/D 

DISK DRIVE 

$579.00 



MOSAIC 32K 

RAM BOARD 

$97.95 



Mastercard/VISA 
Order Toll Free 



800-558-0003 



VISA' 



In Wise. Call 

414/351-2007 



ORDERING INFORMATION 

To order by mail send money order, certified check or personal check (allow 14 days to clear) to COMPUT ABILITY. 
Include $2.00 shipping on software orders and $2.50 shipping on hardware orders (FREE OR PURCHASED). Master- 
card & VISA please include card number and expiration date. WI residents please add 5% sales tax. Outside of con- 
tinental U.S.A. please add 15% shipping (U.S. Funds only). Prices subject to change without notice. 



Order Hours 

f^on, - Fri. 12pm-9pmC.S.T. 
Open Saturday 12pm-5prn 

ComputAbility 

P.O. Box 17882 

Milwaukee, WI 53217 



This advertisement has no 
headHne! 

Mere words fail to convey 
the excitement that is truly 
LEGIONNAIRE. 

Designed & Programmed by Chris Crawford for Avalon Hill 



LEGIONNAIRE is a real 
time game of combat between 
the Roman .Legions of Juilus 
Caesar (you)^and the GauHsh 
barbarian hordes (the 
computer). High resolution 
scrolling graphics and sound 
brings you the live action. You 
have up to ten legions to 
command, each with different 
strengths and weaknesses, and 
a choice of any two of sixteen 
different barbarian tribes to • 
fight. As- Caesar did two 
thousand years ago, you must 
meet the Gauls and defeat 
them. They outnumber you at 
least two to one, so you must' 
use the terrain and the 
disorganization of the 
barbarians to counter your 
disadvantage in numbers. 
Above all, you must be able to 
react quickly to the changing 
battlefield situation, or the 




battle depicted above could 
happen to you! Caesar 
managed to conquer all of 
Gaul -can you do as well, or . 
will the barbarian hordes , 
defeat your legions? 

LEGIONNAIRE is ready to 
run on your Atari® 400 or 800 
with 16K cassette or 32K 
diskette and one joystick. 



Available at finer computer 
and hobby stores everywhere. To 
order by phone, dial TOLL FREE: 

1-800-638-9292 
and ask for Operator A, or write: 
Avalon Hill Microcomputer Games, 
Dept. 81", 4517 Harford Road, 
Baltimore, MD 21214. Please add 
10% for postage and handling. 

^Trademark of Warner Communications 




^e^^'i 





Wittt Cassette For: 


Witli Diskette For; 


PRICE 


SOFTWARE 
GAMES 


TRS-ao 

Color 


TRS-BO 
Models 
1 i III 


ftPPLE 

11 + 


PEI 

can 

2DQ1 


SIABI 
400/ 
800 


TRS-80 
Models 
IS III 


APPLE 
11 + 


ATARI 
400/ 
BOO 


IBM 
f.C 


Legionnaire 










16K 










35.00 
















32K 




40.00 


V.C. 


16K 


16K 


32K 




32K 










20.00 












32 K 


48K 


40K 




25.00 


G.F.S. 
Sorceress 




48K 


48K 




48K 










30.00 












48K 


48K 


40K 




35.00 


Andromeda 
Conquest 




16K 


16K 


16K 


32K 










18.00 












32K 


48K 


40K 


48K 


23.00 


Moon Patrol 










16K 










25.00 






















Tetengard 




48K 


48K 


32K 


48K 










23.00 












48K 


48K 


48K 




28.00 


Draw Pal(er 




16K 


48K 


8K 


16K 










16.00 














48K 




48K 


21.00 


Voyager 


16K 


'16K 


32K 


32K 


24K 










20.00 














4aK 


32K 


48K 


25.00 



.microcomputer gomes* 

I A Division of tine Avalon Hill Game Company 
^nirrrr 4517 Harford Road • Baltimore, IVID 21214 
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NEW PRODUaS 



by The Program Doctors 




The holiday season is upon us and the ATARI 
home computer market is bursting with so much 
quality software that you will be hard pressed as to 
where to spend your Christmas loot. ATARI is 
expecting to reap some of these holiday dollars with 
the 400/800 computer systems now in every major 
department store and discount retailer in the 
country. HOME FILING MANAGER has been 
released and is the finest utility program yet from 
Sunnyvale. It is a large index card filing cabinet on 
disk, that allows you to make notes, catalogue 
records, software, important dates, etc,. Written in 
machine language it will be a useful addition to your 
utility library. Probably the most exciting rumor is 
the supposed release of GALAXIAN, DEFENDER, 
QIX, and DIG DUG to add to our arcade madness. 
ATARI is also producing a rom-based word 
processor WORD- WISE, and in association with 
Lucasfilm LTD., is developing E.T, all by the first 
quarter of next year. 




DEFENDER 

In third party software development, one of the 
trendsetters is Synapse Software. You know you're 
in trouble as soon as you boot up Synapse Software's 
SHAMUS, and the Alfred Hitchcock theme song 
fills the air. Armed with ion-shivs you become 
Shamus, the detective, and must make your way 
through a myriad of four different levels with thirty- 
two floors each in your quest to eliminate the smelly 
Shadow. Your search never seems to end as 
SHAM13S must subdue Robo-Droids, Whirling- 
Drones and Snap-Jumpers. Each of these opponents 
has their own bedeviling characteristics and you only 
have your ion-shivs (the ultimate 21st century 




PROTECTOR II 

weapon) to stop them. Not only must you destroy 
your enemies, you must find keys to get into other 
levels, and solve problems such as how to get past the 
moving rooms. SHAMUS is an arcader's deUght and 
with its four skill levels is a constant challenge. Other 
recent releases from Synapse include NAUTILUS, a 
one or "two player interactive" submarine/des- 
troyer game, and SLIME, a multi-option fast arcade 
game in which you battle the Plexiarians who are 
trying to overflow earth's oceans with their oozing 
goo. The lack of a good cowboy scenario is partially 
filled by CLAIM JUMPER, a good two-player game 
which really tests your hand-eye and reflex 
coordination. You battle to see who can collect the 
most gold. There is also a one-player option. 
PROTECTOR II is now complete and has many 
improvements, including the addition of three- 
dimensionality, a ranking system, and bonus ships. 
PROTECTOR II is the most playable version of the 
game. Remember last summer when you went on 
your family picnic and all that scrumptious food was 
laid out in front of you ready to tickle your taste 
buds? Then came the invasion — spiders, bees, and 
ants by the hundreds — so you really couldn't enjoy 
the feast. PICNIC PARANOIA is the revenge you 
have been waiting for, as that is the scenario in this 
entertaining new game (wait till you use the bug 
spray!!). 

Oh where, oh where are those new programs from 
Arcade Plus? Forget about it. Arcade Plus has gone 
the way of Cartrivision. But fortunately only 
companies go out of business, not programmers, and 
a program originally entitled NIGHT RALLY is now 
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called BAJA BUGGIES by Gamestar. This is the 
game for all of you who enjoyed NIGHT DRIVER 
on the VCS, but with lots of extras. Picture yourself 
as the last car in an 80 car dune buggy race. 
Obviously, the goal is to win by navigating your car 
past all the others. BAJA BUGGIES sports three 
scrolling race courses and two levels of skill. 
Gamestar is also releasing STARBOWL 
FOOTBALL in time for Christmas. If racing is your 
game, check out I.D.S.I. and its new SPEEDWAY 
BLAST ROM cartridge. A pleasant surprise is in 
store with the graphics, full screen scrolling, and 
multi-level play as you transverse a city to pick up 
asphalt-eating monster eggs before they hatch. This 
game becomes very fast as you become more 
proficient in patrolling the city streets. Also in the 
near future from I.D.S.I. is JUGGLER, and the 
ROM cartridge SURVIVAL OF THE FITTEST 
Mattel's Auto Racing has long been considered the 
best race game to date. SPEEDWAY BLAST and 
BAJA BUGGIES may have changed that. 



hate the Menace). Armed only with the traditional 
laser gun and a limited supply of shields, the object is 
to stop the Bandits from their mission. Superb 
ATARI programming in all facets await arcaders who 
have 48K and a disk drive. 




SPEEDWAY BLAST 

Our review of RASTER BLASTER in issue #7 
spoke of our fears regarding Apple arcade games that 
are converted for the 400/800. Every home 
computer has its own unique programming 
characteristics and must be taken into account in 
game software writing. Unfortunately the first of 
many game translations from the Apple to the 
ATARI by Sirius Software did not take this into 
account. SNAKE BYTE, CYCLOD, SPACE EGGS, 
and SNEAKERS are all good games, but they could 
have been great additions to our arcade libraries if 
the programmers had been aware of the potenial of 
the ATARI. Fortunately somebody must have talked 
to Sirius and enlightened them, since their latest 
release is a knockout. In BANDITS you are the 
guardian of a lunar supply base protecting an 
inventory that includes everything but the kitchen 
sink. All is well until the Bandits, a team of greedy 
thieves, begin to raid your supply room. Each of the 
twenty-eight levels of play features its own unique 
assortment of dastardly villains (you will learn to 




BANDITS 

Inhome Software will be releasing several new 
products. GUARDIAN OF THE GORN is an 
original arcade game in which you must save saucers 
trapped in intricate spider webs. The spiders are after 
you, and so is the flying Gorn. You can blow up a 
vein of the web to eliminate a spider, but if you are 
touching the same vein, you will die too. Collect all 
the saucers and return them safely to your home base 
and you will be faced with a completely new web and 
increased difficulty. SENTINEL I is a defender type 
game with a horizontally scrolling screen and wave 
after wave of attacking aliens. If you look closely, 
you will see a familiar creature flying around the 
screen. Both of these games are well done, with hi-res 
graphics and joystick movement that is super- 
smooth, particularly in GUARDIAN OF THE 
GORN. Inhome has spruced up its previously 
released ALIEN SWARM. If you don't already have 
it, and you want it, make sure you get the latest 
version, #06. BASEBALL is coming, just like the ads 
say, so be patient. This program was originally 
written in BASIC, but has been completely redone in 
Assembly language and that is the reason for the 
delay. Inhome will also be introducing the B key 400. 
It is a full stroke keyboard for the ATARI 400 that 
can be easily installed in about two minutes and will 
retail for $119.95. This Canadian company has 
tested the B key 400 in England, and response has 
been tremendous. 

CRYPT OF THE UNDEAD, ESCAPE FROM 
VULCAN'S ISLE, KING ARTHUR'S HEIR, at\d 
THE NIGHTMARE are the new graphic adventure 
games from EPYX. Written in basic and available on 
40K disk, they are similar to the early Crystalware 
adventures in both graphics and sound. If that was 
your cup of tea then these games are for you. 
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Ardent arcaders have a tendency to overlook 
games written in BASIC. A new game from 
Microprose, CHOPPER RESCUE, demonstrates 
the quality that can be achieved with a good 
understanding of BASIC programming. Featuring 
excellent player/missile graphics and machine 
language subroutines for joystick control, 
CHOPPER RESCUE will surprise you with its 
overall speed and quality. Another interesting piece 
is DIGGERBONK, a true maze game written by 
Steve Robinson. A complicated vertically scrolling 
maze is the obstacle along with some grainy 
characters as you lead your "bonker" through the 
path. 




AZTEC CHALLENGE 

Bram Software has released ATTACK AT EP- 
CYG-4. Multi-levels and interactive two player 
options aid in this good space arcade game. Fifty 
separate screens await you as you fly your gravitron- 
drive attack ship back towards Earth, twenty light 
years away. During your journey you pass several 
different planets that have set up many defenses to 
block your successful mission. Sharp hi-res graphics 
with multi-colored landscapes abound; it is really 
too bad that you must destroy them to achieve 
higher scores. The disk version contains three 
separate missions (including one for children); on 
cassette there are two missions each with 35 screens, 
and the planned cartridge version will have one 
mission. 

As the high cost of good gameware eats away at 
your budget we constantly look for bargains to 
satisfy our appetite. Cosmi is feeding this crisis with 
its entry into the game market of four new games 
written in Assembly language on 16K disk and 
cassette. AZTEC CHALLENGE, SPIDER 
INVASION, GALACTIC INVASION, and 
CRYPTS OF PLUMBOUS are the first releases 
from Cosmi. TVie^ retail at a high end price of $ 17 .95 
to a bottom-out price of $9.95. 

Swiftware is being challenged by Gulf &. Western 
for the use of the word 'Trek' in the title "TRIVIA 



TREK". The megaconglomerate is accusing 
Swiftware of attempting to capitalize on the Star 
Trek merchandising rights which G &. W exclusively 
owns. They have accused Swiftware of "unfair 
competition and infringement" and demanded that 
Swiftware stop production of TRIVIA TREK, 
deliver all stock to their Paramount subsidary for 
destruction, and provide detailed information about 
their customers. As we mentioned in Issue #8 
TRIVIA TREK is a great party game and this inane 
claim by G <Sl W can only give this game publicity 
and the increase in sales it is entitled to. While we are 
on the subject of Jerry White (author of TRIVIA 
TREK), he has a new utility package released 
through R D. I. called MUSIC BOX. This useful 
package allows the user to play music anytime while 
using BASIC. Add Beethoven to the mood of your 
games, play a waltz during your programming, or 
create your own music files and play them whenever 
you desire. Since the music is played during VBl's it 
will not interfere with any BASIC program. Charles 
"Non-Tutorial" Bachand and Craig Patchett have 
also provided MUSIC BOX utilities. 




MASTER TYPE 

Arcading is not the only user area that is being 
overwhelmed with new software. For those of you 
on the more serious side, several excellent utility and 
business programs are now available. Compumax, a 
company that develops business software for 
numerous computer systems, has released five fully 
integrated programs for the ATARI 800. 
MICROLEDGER will do all bookkeeping functions 
necessary to obtain a profit and loss statement and 
balance sheet. MICROPERS is a payroll/personnel 
accounting system capable of handling both hourly 
and salaried employees, and will keep an updated 
employee file containing not only current standings, 
but employment history that goes back to the date of 
hire. It will compute payroll amounts, and keep 
records of all accumulated totals of wages and 
deductions. It will print your paychecks, give you all 
information necessary for W-2 forms, and compute 
your quarterly 941 deposit. MICROREC handles 
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your accounts receivable, and it will print invoices, 
customer statements, aging reports, reports by 
customer, date or invoice number, and totals of your 
cash projections. MICROPAY will organize your 
accounts payable, either by due date or by vendor. It 
can calculate the amounts due for any given date or 
time period, and will print checks to your vendors. 
MICROINV is a complete inventory package, giving 
you not only stock status, but on-order information, 
year-to-date sales figures, and vendor reports. It will 
also alert you when re-order levels approach, and 
help you keep your inventory at the most 
economical level. 

Each of these programs can stand alone as a useful 
business tool, but when used in conjunction with 
each other, they provide an even greater array of 
functions. For example, you can use MICROPERS 
and MICROINV to generate a job cost control 
system. MICROLEDGER's journal file is formatted 
so that it can utilize the journal file data created by 
the other four programs. All of these programs are 
menu driven, and come with complete and easy to 
understand documentation. To use the complete 
package, you must have at least 40K and two disk 
drives. A printer is optional (the system will support 
either a 40 or an 80 column printer) but highly 
recommended to get the most from the programs. In 
addition to the "printables" mentioned (invoices, 



statements, checks etc.), all programs generate 
reports that are useful and necessary to the running 
of any business. Because these programs are written 
in BASIC, they are not as fast as you might like, but 
they offer you a degree of flexibility that they could 
not if they were in assembly language. The source 
code listings are included with each program, and 
they are easily accesible to allow you to customize the 
program if necessary. Flowcharts and record 
structures are also provided to assist with 
modifications. This is expecially useful for the 
MICROPERS program, as it is set up for payroll 
based on California (where else?) state regulations. 
ABBS (A-Bit-Better Software) should think about 
changing their name to AWLBS (A- Whole-Lot- 
Better Software). MAGIC MAIL, their first entry 
into the marketplace, is a 100% machine language 
Data Base Mailing System that is user friendly and 
fast. It is menu driven, with pre-set data fields for 
Name, Address, City, State, Zip Code, Area Code, 
Phone Number, Birthday, and Entry Type. The 
Entry Type field is similar to the key field in DATA 
PERFECT. It allows you to code entries in a 
particular way, for example, R=Relative, S=Store 
etc. You can create completely separate data files for 
each category, with up to 62 files per disk. You can 
store up to 1027 records per disk, and can easily 
create additional data disks. You can even work off 



You've invested a lot of time and money into your computer . . . 

IVs time that investment paid off! 




THE COLOR ACCOUNTANT 




The Programmer's Institute introduces THE COLOR ACCOUNTANT, the only complete personal financial package 
specifically designed for the Atari 400/800 computer. This unique package includes: 

1. Complete Checkbook Maintenance 5. Payments /Appointments Calendar 8. Home Budget Analysis 

2. Chart of Accounts Maintenance 6. Color Graph Design Package 9. Decision Maker 

3. Income/Expense Statement (graphs any files) 10. Mailing List 

4. Net Worth Statement 7. Check Search 



After the initial setup, THE COLOR ACCOUNTANT requires less 
than an hour of data input each month. 

The checkbook maintenance program is the key to the entire package. 
Once your checkbook is balanced, the checkbook summary Hie will auto- 
matically update the home budget analysis, net worth, and income/ 
expense statements. You can then graph any file, record bills and appoint- 
ments, make decisions, print a mailing list, and analyze various accounts. 

All programs are menu-driven and allow add/change/delete. Files 
and statements can be listed to screen or printer, and saved to casetle or 

The perfect supplement to THE COLOR ACCOUNTANT, The Tax Handler includes: 

1. Complete From 1040 3. Schedule G (Income Averaging) 

2. Schedule A G<emized Deductions) 4. Schedule B 

This year let The Tax Handler prepare your taxes ($34.95 cassette, $39.95 diskette). 



diskette. THE COLOR ACCOUNTANT also comes with 60 pages of 
documentation that leads you step-by-step through the entire package. 
The Atari 400/800 requires 24K for cassette and 32K for diskette 
($74.95 cassette, $79.95 diskette). 



Add $3 for postage and handling. 

See your local dealer or order direct: 
THE PROGRAMMER'S INSTITUTE 

////««, n " division of FUTUREHOUSE 
liiL II PO- ^^'^ 3191, DEPT. AL 
mmrni, u cHAPEL HILL, NO 27514 




1-800-334-SOrr 

Mon-Fri 10-6; Sal 11-3 
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of multiple disk drives. Sorting can be done on any 
field, with up to 10 sub-fields, and search time is 
measured in seconds!! Printing can be in either label 
format or directory format, and is compatible with 
the, Epson printer. A sample file is included on the 
disk, and the manual takes you through a practice 
run using this file. The manual is easy to understand, 
and also includes a glossary of terms, error messages, 
and command summary. ABBS is planning to release 
a disk utility package next, with more coming. If the 
quality of MAGIC MAIL is upheld in their future 
programs, they promise to be excellent. 

Do you want to learn to type, or improve the 
typing skills that you now possess? Do you hate the 
drudgery associated with most typing lessons (Type 
"a". Type "s". Type "a". Type "s", Type "as". Type 
"asa" ad infinitum)? Then MASTER TYPE from 
Lightning Software is for you. Enemy words are 
attacking your Command Ship, and the only way to 
destroy them is to type them out before they get too 
close. There are 17 progressive lessons, ranging from 
the home row, to eight and nine letter words, 
numbers, shifted symbols, and punctuation marks. 
You may create your own lessons, customizing them 
to your particular problems, and save these lessons 
to disk for re-use. After each enemy attack, you are 
given a rating that includes how many errors you 
made and how many words per minute you were 



typing. Besides the fact that this is a wonderful 
teaching program, it is a hi-res game that is a lot of 
fun to play. 

Making learning fun is also what is behind 
Spinnaker Software Corp., a new company working 
in conjunction with such organizations as the 
Computer Learning Connection and Design Ware. 
SNOOPER TROOPS-Case #1 The Granite Point 
Ghost is an adventure game for ages 10 to adult. 
Using hi-res graphics, animation, and sounds, you 
are immediately caught up in solving a mystery in 
your guise as a Snooper Trooper. Utilizing the skills 
needed to solve any adventure -type game, 
SNOOPER TROOPS will help children learn to 
take notes, draw maps, classify and organize 
information, and develop vocabulary and reasoning 
skills. Don't let the fact that it's aimed at kids (age 10 
and up) scare you away; this is a challenging detective 
game that requires interrogation of suspects and 
witnesses and investigation of many types of clues. 
SNOOPER TROOPS-Case #2 The Disappearing 
Dolphin will be available shortly, as well as two other 
programs for younger children, PACEMAKER and 
STORY MACHINE. 

In our CES overview, we talked about the new 
EduFun! series coming from Milliken Publishing. 
Well, all six of the MathFun! programs are out, and 
these are excellent teaching aids. Each package 



Experience the 

Magazine 

of the Future , 



The Programmer's Institute's magnetic magazines 
will entertain, educate, and challenge you. 

Each issue features ready-to-load programs ranging from 
games, adventures, home appHcations and utilities to personal 
finance, educational, and our unique teaching programs. Our 
magazines include fully listable programs, a newsletter con- 
taining descriptions and instructions for all programs, and notes 
on programming techniques used. 



TM 




IU6ATAR 



I 



for the Atari 400/ 800 



orders only, toll free number: 

1-800-334-SOFT 



1 ORDERING INFORMATION 1 


Subscriptions* Cassette 


Diskette 


Year (lO issues) $50.00 


$75.00 


1/2 Year (5 issues) $30.00 


$45.00 


Trial Issue $10.00 


$15.00 


* Add $2.00 postage and handling. 
ALL SOFTWARE REQUIRES 16K. 



See your local- dealer or order direct: 
THE PROGRAMMER'S INSTITUTE 

a division of FUTUREHOUSE 
P.O. BOX 3191, DEPT. AL 
CHAPEL HILL, NC 27514 




for information: 

1-919-967-0861 

Mon-Fri 10-6; Sat 11-3 
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contains two separate games, teaching a specific 
math concept for various age groups. All programs 
are available on either disk or cassette, but only the 
disk versions contain The Manger. This is a record 
keeping system that keeps track of the scores and 
progress of each child using the games. Good 
documentation is provided for both parent and 
student, along with re-usable score cards and 
suggestions for extending the concepts into daily 
activities. The titles available and their areas of 
concentration are; THE JAR GAME (probability 
and problem solving) & CHAOS (directionality, 
color and shape discrimination) for ages 6-10; 
ALIENCOUNTER (counting) & FACE FLASH 
(counting, visual memory, and base ten) for ages 5- 
9; GULP!! (additon and multiplication drill) &l 
ARROW GRAPHICS (problem solving and 
directionality) for ages 7-12; FRENZY (subtraction 
and division drill) &l FLIP FLOP (transformational 
geometry) for ages 7-12; BATTLING BUGS 
(positive and negative numbers) & 
CONCENTRACTION (equivalent fractions and 
visual memory) for ages 9-12; GOLF CLASSIC 
(angle and length estimation) &. COMPUBAR 
(reading graphs, constructing arithmetic 
expressions) for ages 9-99. 




GULP 

Another newcomer to the ATARI market is L & S 
Computerware. Their CROSSWORD MAGIC is a 
must for any crossword puzzle addict. 
CROSSWORD MAGIC allows you to create your 
own puzzles and save them to disk. You can select the 
size of your grid, or choose automatic sizing, in which 
the computer will automatically adjust the puzzle size 
depending on the words you enter. After inputting 
all of the words in the grid, you enter the answers and 
save the puzzle. The fully machine language program 
is menu driven, offering you many useful options. 
You can always go back and edit a puzzle, you can 
save an incomplete puzzle and finish it later, you can 
transfer your puzzles to other data disks, and if you 
have a printer with graphic capabilities (the program 



works with 24 different printers), you can print 
puzzles for your friends. Because this program was 
originally written as a teaching tool, the puzzles are of 
the British style, where words are interconnected 
only in a few places, rather than with solid boxes of 
letters as in the American style crossword. L & S has 
also released a card game, ACEY-DEUCEY. You are 
dealt two cards face up and one in the middle face 
down. You bet on whether or not the down card falls 
in between the other two. There are two versions of 
the game, Break the Bank or The Pot Game, and up 
to four people (plus the computer) can play. This 
game is exceptionally fast, and the card graphics are 
clear and very well done. 




INHOME SOFTWARE'S 
B KEY 400. 



Five more "new to ATARI" companies have 
announced upcoming programs. Watch for Sentient 
Software's GOLD RUSH, an arcade game and 
CYBORG, a 48K double sided adventure game with 
full sentence input; Big Five's new cartridge MINER 
2049'ER, a climbing game; and KEN USTON'S 
BLACK JACK from Intelligent Statements, to be 
released sometime early next year. Datamost, a very 
prolific Apple software producer, has announced the 
immediate release of PIGPEN and the promise that 
many of their programs will be available for the 
ATARI in 1983. "Strategic Intelligence Classics in 
their Definitive Microcomputer Versions" is the 
way that Odesta is billing their new versions of 
CHESS, CHECKERS and ODIN (Othello). We are 
looking forward to previewing all of these new 
releases. D 
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LEFT HANDED JOYSTICKS 



by Darren Layne 



Here is a useful article for all left-handed ATARI 
Computer and VCS owners. The ATARI joysticks 
were mainly designed for right-handed people. Most 
people move the joysticks with their right hand and 
press the fire button with their left thumb; some left- 
handed people find this difficult. Well, after a little 
look at the inside of the joystick controllers, I've 
figured out a way to modify the joysticks for left- 
handed people. Here is how you do it: 

1. Turn the joystick over and remove the four 
screws holding the joystick together. 

2. Remove the top half of the joystick. (Don't 
lose the fire button.) 

3. You will notice a small board with six wires 
attached to it (see Figure #1). As you can 
see, they are colored. 

4. The wires easily slide off the board. You are 
going to have to change the position of 4 
wires. Slide the blue and white wires off the 



board. Slide the blue wire back on the board 
where the white wire was, and the white 
back on where the blue was (Figure #2). 
5. Slide the green and brown wires off the 
board. Slide the green wire back on where 
the brown was and the brown where the 
green wire was (Figure #3). Put your joy- 
stick back together and you are finished. 
One more thing you are going to have to change is, 
instead of holding the joystick with the red button 
towards the screen, you hold it with the button 
towards you (Figure #4). 

If you ever want to change your joystick back, just 
reverse the steps so the wires appear the same as in 
Figure #1. 

Instead of modifying your joysticks, you could go 
out and spend about $40.00 for a controller with a 
fire button on top of the joystick, but that's up to 
you. n 




3 



Orange 

Blue 

Brown 




Green 
White 
Black 




THE 



AUSTIN EQUATION 



400 + 150 



11 



MEMORY POWER FOR YOUR ATARI 400* COMPUTER 



$^4995 



Sugg. list. 



48K AUSTIN BOARD 



TM 



AUSTIN BOARD"^ FEATURES 

64K RAM Technology for improved reliability & lowest power 
consumption. 

Superior CAD/CAM generated P.C. design. 

Complete bank and board de-coupling for cleanest signal 
possible. 

Gold edge connectors. 

Lifetime warranty. 

P.C. template provided for easy ATARI 400* installation. 

Full testing. 

ATARI 800* compatability with optional loop-back card 
(available for $5.00 additional). 



32K AUSTIN BOARD $94«5 



SUGG. LIST 



AUSTIN FRANKLIN ASSOCIATES 

617-772-0352 

43 GROVE STREET, AYER, MA 01432 

M/C, VISA & COD ACCEPTED DEALER INQUIRIES INVITED 

"ATARI IS A REGISTERED TRADEMARK OF ATARI, INC. 
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SAFRYLAND 



CASSETTE 16K DISK 24K 



by Peter Naleszkiewicz 



You were 'flying' through the universe at some 
macro-light speed. You forgot to monitor your flight 
analysis devices (you were busy fighting the 
computer in a mind battle). Your present flight path 
was slightly altered by an above -average amount of 
space debris. Heading for certain death via collision 
with a fast approaching planet, you realize the 
dangerous predicament you've stumbled into. With 
no time to save the ship, you think fast. Quickly, you 
enter the escape pod and eject yourself into the alien 
atmosphere. 

You've been lucky. Your readings show that the 
planet is supporting humanoid life. After a safe 
landing, you step out of your pod only to be greeted 
by a crowd of desperate primitives. They speak a 
language which is similar to one of the many 
"universal" languages you have mastered. You find 
that they worship you as almost a demi-god. They 
insist that you run their small, broken-down, 
commune-type country. 

With your ego speaking instead of your brains, 
you accept this virtually impossible task. 

Now, you quickly find that the country is in 
shambles! With minimal resources at your disposal, 
you must allocate food expenditures, personnel, and 
supply expenditures to the farms, military, mineral 
mining, and industrial factories. See how long you 
can last without causing a revolt! 

This is the Safryland scenario. It is a wonderfully 
involved variation of the "run a government" type 
computer simulation. Unlike others though, the 
Safryland player will feel the pressure of actually 
running a government, for he or she will have to do 
some complex analysis and decision making in order 
to hold the country together. With some experience 
(and a little luck!) it is possible to make Safryland 
an expanding, flourishing country. 

Isn't that a great scenario? It's a shame that ail-too 
many computer games have wonderfully imaginative 
set-ups, only for you to be greatly disasppointed 
when the game falls quite short of what your 
imagination was lead to believe. I am not one to 
break the standards of computer game scenarios, but 
you will find this game challenging and fun. Unlike 
many game listings found in books and articles, most 
people will not get bored with this game even after 
hours of mind-stimulating play. 

Hidden under this surface of total enjoyment is a 
hint that I hope to see more programmers use in the 
future. Safryland has an almost totally unique ability 



to print both to the screen and to your printer 
simultaneously. With a little examination, it can be 
seen that the technique used can be slightly modified 
to print to as many devices simultaneously as you 
like (such as printers/screen/modem/ voice 
synthesizers! ) For those who are too anxious to scan 
the program, this is accomplished in the following 
manner: write a subroutine that prints a print string 
variable (called P$ in Safryland) to all the devices 
desired. Don't forget to OPEN them in the beginning 
of the program whenever you want to output some 
message or assign your variable to that message.) 
Finally, you call (GOSUB) the subroutine. For more 
versatility, you might want to add routines that 
concatenate (add) two or more output strings or 
numbers together before they call the print routine. 

Safryland will easily run on a 16K ATARI. For 
those who don't have a printer, just don't choose the 
print-out option. The game is quite playable without 
a printer, however, a hard copy is a valuable 
reference for analysis of past decisions and 
outcomes. For those who do have a printer for their 
ATARI computer, I suggest you use it until (if!) you 
begin to get skilled at running the government of 
Safryland. The print-out should work fine on an 
ATARI 40 column printer or a larger printer (it was 
designed with an MX-80). 

Some extra backround and minor clues may be 
necessary to enjoy this simulation (game?) to its 
fullest potential. First of all, the monetary unit in 
Safryland is the Safry. (No surprizes yet!) One Safry 
is roughly equivalent to one or two thousand dollars. 
To avoid starvation, each person must receive at least 
one Safry per year. As cruel as it may seem, it may be 
necessary to, shall we say, let a few of the people go to 
save money. Don't let too many die or they will 
revolt! 

Farming supplies and military equipment will 
deteriorate without some funds to restore failing 
equipment. If you own more land (measured here in 
Safry acres) then you have a chance at making nnore 
money farming. This is especially true if the price of 
land is higher for a given year, since higher priced 
land implies better farming conditions have been 
forecasted. However, more land is harder to defend, 
so appropriate military action should be taken. It is 
also much easier to expand your land holdings if you 
don't own so much land. 

Industrial factories and mineral mines are 
built/ discovered and kept up by allocating Safries to 
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industry and geological testing respectively. Note 
that more factories or mines require more funds just 
to keep them going. A factory will not be built nor 
will a mine be discovered if the land is not owned to 
do so on. If you sell land you run the risk of losing 
some factories and/or mines. 

Generally, do not underestimate the formulas in 
this progran\. If it seems that some action may be 
logical in real terms, try it! Unless you've made a 
logic error, it may work. At the end of your term in 
office, your performance will be rated. Please do not 
be insulted. It will take much practice to learn what 
decisions to make when. Take advantage of rainy 
seasons, and be prepared for earthquakes and 
drought. 

After hours unexpected enjoyment figuring the 
ways of running this alien country, one might ask, 
"Why did this person not try to sell such a fantastic 
program, instead of letting everyone who wants it 
copy it for such a nominal price?" Brillant question, 
except for one thing. A quick description of 
Safryland sounds like something that is already 
available in "computer game books". This led me to 
believe that attempting to sell this program would be 
an up-hill battle. I am working on many programs 
now for possible sale or submission to various 
publications. If you have any questions or 
suggestions about Safryland, please feel free to write 
me at this address: Peter Naleszkiewicz, 1006 
Broadmore Circle, Silver Spring, Md. 20904 



10 REH KMMMKICMMKICMICKKKKMKK 

12 HEM *»» SAFRYLAND *** 

15 REM MMMMaCMKKKlCKltMKKMKKM 

28 REM H/ OUTPUT TO SCREEN 

25 REM OR BOTH SCREEN AND PRINTER! 

38 REM 

35 REM By Peter Naleszkiewicz C 1982 3 

48 REM 

58 DIM R5C13),P$C88} 

188 ? "DO YOU MANT A PRINT 0UT";:G05UB 

1970:PR=R:IF PR THEN OPEN «1, 8, 2, "P :"' 
.'GOTO 158 

128 OPEN ttl,8,2,"E:" 

158 YR=8:PP=INTCRNDC8}«50e+58e3 :SF=INT 
CRND (e)«15eO«PP«l . 2) : AC=:INT CRND f 0)»iee 
+PP/18J :MAX=PP 

168 FM=INTtRNDC0)»50+PP/15) :MM=INT(RND 
C83«AC/188] :ID=INTtRNDf8i»23 :ML=INTCRN 
DCBJWPP/^+PP/gj 

178 LY=INT CRND t8J»2B+25) : REM *** FIND 
MAXIMUM tt OF YEARS TO RULE 
288 ? ttl;? ttl:? «l: GRAPHICS 0:PS=" 

YEAR « "rUrYHlGOSUB 1820 :PS=" P 
opulation : ":U=PP:GOSUB 1820 
218 p5=" Safries in treasurey : "lU 
=SF;G05UB 1828 

220 P$=" Acres of land : ":U=AC:GOS 

UB 1828 

238 P$=" Safries worth of farwing": 
U=-9.9:G05UB 1820:PS=" equiphtent 

: ":V=FM:G0SUB 1820 
235 pS=" Safries *«>rth of Military" 
:V=-9.9:G0SUB 1820:PS=" supplies 

; ";yrfR.:GOSUB 182B 
248 PS=" « of Mineral Mines : ":U=M 
MiGOSUB 1820 

258 PS=" tt Of industrial factories 
: ":U=ID:GOSUB 1820 
255 IF PP>MAX THEN MAX=PP 
268 IF PP<MAX/2 THEN 3888 
278 IF YR=LY THEN 3180 



288 IF YR=3 THEN LMPP=PP : LMFM=FM: LMML= 

ML : LI«IM=MM : LHID=ID : HGFM=FM : HGML=ML : HGM 

M=MM:HGID=ID 

308 GOSUB 1080: REM LAND PRICE 

318 IF YR<4 THEN 48e:REM DON'T KEEP TR 

ACK RECORD OF 1st 3 YEARS 

315 REM *** KEEP TRACK OF HIGH AND LOM 

STATISTICS C for grading perfor»ance 
} 

328 IF LMPP>PP THEN LMPP=PP 
325 IF LMFM>FM THEN LMFM=FM 
338 IF LNML>ML THEN LMML^ML 
335 IF LMMM>MM THEN LMMM=MM 
348 IF LUID>ID THEN LMID=ID 
345 IF HGFM<FM THEN HGFM^FM 
358 IF HGML<ML THEN HGML=:ML 
355 IF HGMM<MM THEN HGMM=MM 
368 IF HGID<IO THEN HGID=ID 

488 pS="Do you want to sell any land " 
: GOSUB 1888: GOSUB 1978: IF R THEN GOSUB 

2858 
485 GOSUB 1900:PS="on food for your pe 

ople ":GOSUB 18e8:G0SUB 1940:SFF=R 
408 IF R>SF THEN PS="»*»You only hage 
":U3SF:G0SUB 1820:GOTO 485 

489 SF=SF-SFF 

418 IF 5F THEN PS="Do you want to buy 

any land ":GOSUB 1808:GDSUB 197e:IF R 

THEN GOSUB 2088 

428 R=0:IF SF THEN GOSUB 1900:PS="on f 

arMing equipMent ":GOSUB 188e:G0SUB 19 

48 

425 MFM=R:IF R>SF THEN PS="*««You only 

haye ":U=SF:GOSUB 1828:G0T0 428 
427 SF=SF-MFM 

438 GOSUB 1920:PS="work on farMS this 
year ": GOSUB 1800: GOSUB 194e:PFM=R 
435 IF R>PP THEN PS="»»*You only haue 
":g=PP:GOSUB 1820:G0T0 438 
448 R=e:IF SF THEN GOSUB 1988:PS="on N 

ilitary equipnent ":GOSUB 1880:G0SUB l 

948 

445 MML=R:IF H>SF THEN PS="»««You only 

haue ":g=SF:G05UB 1820:GOTO 440 
447 SF=SF-MML 

450 R::0:IF (PP-PFMJ THEN GOSUB 192e:PS 
="work in the Military this year ":GOS 
UB 188e:G0SUB 1948 

455 PML=R:IF R>PP-PFM THEN PS="»*»You 
only have ":U=PP-PFM:GOSUB 1828:6010 4 
50 

460 R=0:IF (PP-PFM-PML) THEN GOSUB 192 
0:PS="work in Mines this year ":G05UB 
1880: GOSUB 1940 

465 PMM=R:IF R>PP-PFM-PML THEN PS="*»» 
You only have " :U=PP-PFM-PML : GOSUB 182 
e:GOTD 468 
478 R=0:IF CPP-PFM-PML-PMM> THEN GOSUB 

1928 :PS="work in factories this year 
":GOSUB 1800: GOSUB 1948 

475 PID=R:IF R>PP-PFM-PML-PMM THEN PS- 
"JHBtYou only have ":U-PP-PFM-PML-PMM:G 
OSUB 1828:G0T0 478 

488 R=8:IF SF THEN GOSUB 1900:P5="for 
geological testing/Mining supplies ":G 
OSUB 1800: GOSUB 1940 
485 MMM=R:IF R>5F THEN PS="»»»YOU only 

haue ":U-SF:GOSUB 1820:G0T0 480 
487 SF=SF-MMM 

490 R=8:IF SF THEN GOSUB 1900:PS="on i 
ndustry ":GOSUB 1800:GOSUB 1948 

495 MID=R:IF R>SF THEN PS="*»«YOU only 

have ":U=SF:G05UB 1828:G0T0 490 
500 5F=SF-MID: GOSUB 2200: REM FARMING 
UTCOME 

505 GOSUB 2500: REM PEOPLE DTE? 
510 GOSUB 1208: REM COMPUTE MILITARY HO 
LDIHG/EKPAHSIOH 

520 GOSUB 1408: REM MINING OUTCOME 
538 GOSUB 1600: REM INDUSTRY OUTCOME 
540 GOSUB 4888: REM NATURAL PHENOMINAE 
558 IF AC<5 THEN 3810 

588 ? ;? "HIT RETURN TO CONTINUE,..":! 
NPUT R$ 

590 YR=YR+1:G0T0 208 
999 STOP 
1088 ACP-IHTCHNDt0J«4 + 2J+DR:IF DROO T 




DATA PERFECT 

FOR THE ATARI 400 AND 800 COMPUTERS 



YOU MAKE THE COMPARISON 






D.P. 


FILE 

rVIANAGER 

■■800 ■ 


GENERAL INFORMATION 

Cost of Program HHHHHHi^ 




S99.95 




Cost of Utilities Program 
llmluded In ProgramI 


$00.00 




llncluded In ProgramI 


$00,00 




Compatible With Letter Perfect (tm) 
Word Processing 


YES 




Mfini) nriuBn iii«iiii«iiiiiiii™iiiiiJniJlMJ_u_.~_. 


YES 




CompleiB Documentation 
/Manual Tabbed And Indsxedl ______ 


YES 




Single Load Program flHSHi' 
INo Swapping Of Program Diskette) JBHIHHHK 


YES 




Machine Language 
lExtremely Fast OperalionI 


YES 






YES 




Can Us Multiple Disl< Drives 


YES 




Ability To Design Screen Masl< SHHHB 
lUssi Designs Arrangement 01 Data! ^^^B^m 


YES 




Full Keyboard Editing Available 
IDeletellnsert A Character; Go To End/Beg 
of Line; Fine 'n', TAB, FTC.I 


YES 




Compatible With Bit 3 80-Column Board flHHHB 
140-Eotumn and 80-Column Version Available) ^KmKg^^ 

III lii'l 1 r-\ rilr*'" ^^■Bhiw^^^w^^^^^™bC' 


YES 




Worl<s With Any Parallel Printer 
(Supports Atari 850 Interface! 


YES 




Totals Of Numeric Field 
1 Return Total And Average Value/Fieldl 


YES 




Fail Safes Provided For Data Protection 


YES 




Error Messages Displayed 'flBBHHBK 
Status Lines For Ease of Use 
lOpfions Always Available For Referencel 


YES 




YES 




SEARCHES AND EDITING 






Multiple Searches Allowed On Same Record JHHHI 
ISeatch On 9 Criteria Per Record) maJtrntSKm 


YES 




Search On Two Criteria In Same Field 
/Up To 4 Fields In Single Record) 


YES 




Wild Card Searches '■■■■1 
lAnd/Or, Include, Cliaracter, Or Bhcid :fl9iBi 


YES 




Search On Basis Of Record Number 
(Search For An Individual Record) 


YES 




Search On Range Of Data Desired .—j™»«.-«» 
(Dates, Numbers, Values, Greater Or less Than, Equal To, etc) 


YES 




Editing Of Records Individually 


YES 




Editing Records Globally 
(Verification Allowed) ^mmmm 


YES 




Delete Records Individually 
(Verification Allowed) 


YES 




Deleting Records Globally 
(Verification Allowed) 


YES 




UTILITIES SECTION 








YES 




Delete Fields From Existing Data Base 


YES 




Reformat A Data Base flHHHHIl' 
(Copy Format Of Existing Data Basel ^|HHHIHI' 


YES 




Mal<e Additional Copies Of Data Base 
(Create Data Base For Extended Records) 


YES 




Sort on Multiple Criteria 
(Sort On Basis Of 4 Fields In A Son) .^^^smmmam 


YES 




Sorts Or Multiple Critena 
(Assending Or Descending) 


YES 




Depth Of Sort Can Be Chanped 
(Designate Number Of Charters Deep To SortI 


YES 




Merge Information From Other Data Bases 
(IVIerge Standard Text Filesl 


YES 


Add Or Delete Fields From Data Base 


YES 




Merge Previous Entered Data From Existing File 


YES 




Back Up A Data Base 
fit/lake A Back Up Of Current Source Data) 


YES 




Pack A Data Base 
(Remove Deleted Records From Disk Storagel 


YES 





D.P. 



REPORT GENERATOR 

Design Report To User Specifications 
Level Breaks Allowed At Users Option 

(Up To 4 Leve( Breaks Per Report) 
Designate Font To Be Used In Report ^ 
Boldfacing Allowed In A Report 

(With Dot fVlatrix Printer) 
Mathematical Formulas Allowed In Report 

(Example, Field Y + Field 'y' - Field Yj 
Auto Page Number Allowed In Report 
Auto Date Entering Allowed In Report 
Repeating Characters Allowed 
Optional Level Breaks and Page 
Breaks When Sort Values Change 
Up To 7 Lines Allowed For 

Header on Each Report 
Up To 2 Lines Allowed For Detail 

information On A Report 
Variable Spacing Allowed Between Data 

On Items In A Report 
Multiple Fields Allowed In A Report 

(Number, Date, Alpha, Formula) 
Search Criterion Allowed On Report 

(Same Criteria As In Fditorl 
Ability To Have "Literal" Data 

Printed In A Report 
Ability To Have "Conditional" Data 

Printed In A Report 
Use A Default Date Field 
Designate Default Value For Specihc Fields 





LABELS REPORT GENERATOR 

Mailing Labels Allowed 

(Specificafly Designed For Labels) 
User Designs Data Placement On Label 

(One Across Label Designl 
Multiple Fields Allowed On Label 

(Date, Alpha, Numeric, Formula) 
RepeaUng Characters Allowed 
Front Designation Allowed 
Print Labels On A Conditional Basis 
Search Criteria Valid On Label 

(Same Search Criteria As Editing) 




MATHEMATICAL ABILITIES 

Basic Math Calculation __ 

Addition, Substraction, Multiplication, Division 
Built In Calculator lAutomaticI 

(Use In Editing, Or Adding Data) 
Find the Integer Value Of A 

Numeric Expression 
Find The Log Base 'e' Of 'x' 
Find The Log Base 1 D' Of Y 
Find The Absolute Value Of 'n' 
Exponeniential Notation Used 
Find The Square Root Of 'n' 
Formulas Allowed Between Fields 

(Field X /+ - '/) Field y - Field i] 

[Field X /+ - yy N » Field Y) 



SPECIFICS 

Maximum Number Of Fields Per Record 
Maximum Number Of Formulas In A File 
Maximum Length Of A Field , 

Maximum Record Length 
Maximum Number Of Leval, Breaks 
Records Per Diskette 
(Depends On Length And Number Of Fields) 

Data Bases Allowed On Each Diskette 
(Can Be Expanded To Additional Disl^ettes) 

Form Letter Capability 
(Compatible With Letter Perfect) 



YES 

YES 

YES 

YES 

YES 

YES 
YES 
YES 
YES 

YES 

YES 

YES 

YES 

YES 

YES 

YFS 

YES 

YES 



YES 

YiiS 

YES 

YES 
YES 
YES 
YES 



YES 

YES 

YES 

YES 
YES 
YES 
YES 
YES 
YES 



32 

16 

127 

511 

4 

VAR. 

YES 



FILE 

MANAGER 

■■800^^ 



UK ENTERPRIES, INC. 



P.O. BOX 10827 

ST. LOUIS, MO. 63129 

[314] 846-6124 



Atari - A Trademark of Atari Inc., Full View 80 a Trade Mark of Bit 3 Computers, 
Fill Manager 800 A Trademaik of Synapse Software, Letter Perfect, Data 
Perfect A Trademark of LJK Enterpries, Inc. 
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HEN DR=e 

1620 PS="Land is selling for ":GOSUB 1 

8efl:PS=STR$facPJ :GOSUB 188e:U=-9.9:PS= 

" sf. per acre.":G05UB 1828 

1868 RETURN 

1288 ? ttl:TRftP 1268:C=l:IF RNDCe)»CftC« 

5/(PML+HL/3JJ<2 THEM C=2 

1218 IF C=l rONO RMO C83»CAC»5/ CPML+ML/3 

)J>4 THEM C=3 

1228 ML=IHT tML-ML»RND te)»8 . IJ : ML=IHT CM 

L+RMDC83»MliL»8.4J :IF MLO THEM ML=8 

1238 ON C GOTO 1278,1348,1308 

1268 C=3:G8T0 1228 

1278 pS=" No Hilitary action this year 

.":U=-9.9:G05UB 182e:RETURN 

1388 AL=INT CRND C8)«ie+RND C8)»AC/ CPML/'2 

+1.8E-83+HL/4J) :IF ftL>ftC THEN ftL=flC 

1318 PS=" ft Hilitary DEFEAT! LOSS Of 

acrage : ■■:U=AL:G05UB 1828 
1328 P$=" Loss Of people : "ryrOLiG 

05UB 182e:PP=PP-flL:RETURN 

1340 AL=INT CRND fOJ*18+RHD C8J»CPML/2*ML 

/'451 

1350 PS=" A Hilitary UICTORV" acrage 

gained : •■:U=AL:GOSUB 1828 
1368 AC=AC*AL : AL=INT (RND CO)«AL+RNI> tO)» 
18) 

1370 PS=" people gained : "zW^ALzGO 
SUB 1828:PP=PP+AL:RETURN 
1488 HM=IHTCMM-RMDC0J«MIW8.5J :HM=INT{H 
M4RND(8)»HHN»8.83} :IF HH<8 THEN MM=8 
1482 IF HM>AC/8 THEN HM=INTCAC/8> 
1484 IF HM>PHM/18 THEN HM=INT CPMM/183 
1486 PS=" NuHber of Mines lost/discove 
red : ":U=HM-MM:Ge5UB 182B:MM=HM 
1418 AL=tMM<>8)«CPMM<>eJ*IHTfRHI>C8>«tP 
MI«*2+198*MMJ) :? »l:PS=" Safries earned 

in Mining : ":g=AL:G05UB 1820 
1428 5F=SF+flL:RETURM 

1688 HD=IHTCID-RMD(0)«ID*0.3) :HD=INTCH 
D+RND(8}#MID«8.821 :IF HD<8 THEN HD=e 
1682 IF HD>AC/6 THEN HM=INTtAC/6J 
1684 IF HD>PID/5 THEM HM-INT CPHM/5J 
1686 PS::" MuMber Of factories lost/bui 
It : "rVrHD-IDzGOSUB 182e:ID = HI> 
1618 AL=CPID<>e)«CID<>e>»IMT(RMDC8>«fP 
ID»1.5+150»IDJ) :? ttl:PS=" 5afries earn 
ed in industry : ":UrAL :G05U8 1828 
1628 5F=5F+AL:RETURM 
1888 ? ttl;PS;:IF PR THEM ? PS; 
1816 RETURN 

1828 IF UO-9.9 THEN PS tLEN fPSJ +1J =STR 
SfVJ 

1825 ? ttl;PS:IF PR THEN ? PS 
1838 RETURN 
1988 pS::"How Many Safries do you want 

to spend "JGOTO 1808 

1920 PS=:"How Many of the people do you 

want to '■:G0T0 1888 
1940 TRAP 1948:IHPUT RS:IF RS="" THEN 
1948 

1945 R=UALCRS):IF R<e OR STRSCRJOrS T 
HEN 1948 

1950 IF PR THEN ? ttl;"? •■;RS 
1955 RETURN 

1970 TRAP 1940: INPUT RS:IF RS=—' THEN 
1978 
1973 R=8:IF RStl,l)="Y" OR RStl,lJ="y 

THEN R=l 
1975 IF PR THEM ? ttl;"? ";RS 
1980 RETURN 

2000 pS="How Many acres do you want ": 
GOSUB 18e8:G0SUB 1948 

2810 P=R«ACP:IF P>5F THEN PS="«»*YOU O 
nly have ":U=5F:G0SUB 1828:P0P :G0T0 4 
10 

2828 SF=SF-P:AC=AC+R 

2838 PS-" Acres now owned : ":U=AC:60 
SUB 182e:RETURN 
2858 PS="How Many acres do you want to 

sell ":GOSUB 1880:G0SUB 1940 
2868 P=R»ACP:IF R>AC THEM PS="«*»V0U 
nly haue ":V=AC:GOSUB 1820:P0P :G0T0 4 
08 

2070 SF=SF+P5AC=AC-R:G0T0 2830 
2288 IF PFM=B OR FMrO THEM T=8 ! GOTO 22 
02 
2281 FT=INTCRND{0)»AC/2+AC/'3J :T=INT<FT 



*tFM/PFM3> :IF T>FT THEN T=FT 

2282 FH=INTCFM-FHKRNDC0)«0.1) :FMzINT{F 

H+RMDtBJ*MFri»0.4J :IF FM<0 THEN FH=B 

2210 ? ttl:PS='« Acres of farMable land 

this year : ":V=T:GOSUB 1B28 

2220 M=INT (ACP-RND C0J«3+FM/ f T+8 . 81J )»T 

:M=M»fM>8J :PSr" Safries earned froM fa 

rMing : ":U=M:G8SUB 1820 

2238 5F=5F+M: RETURN 

2580 SUR=SFF-PP:IF SUR<0 AND DR<>2 THE 

N PP=PP+5UR:PS=" STARUATION!' PEOPLE 

STARUED = ":U=-SUR:GOSUB 1828 

2518 IF SUR>8 THEN NP=PP+INT f RND Ce)«SU 

R/10J:PS=" FOOD SURPLUS •• NEH BORN : 

":W=MP-PP:G05UB 1828:PP=NP 

2520 IF DR<>2 THEN SUR=:INT CRND (0)«PP«e 

.13 :PP=PP-SUR:P5=" People died of natu 

ral causes : ":V=sur:GOSUB 1828 

2538 IF PP<5 THEM 3888 

2540 RETURN 

3000 ? ttl:? ttl:? ttl:PS=" OH HO'. TOO 

MANY HAUE DIED ... RESOLUTION STARTED! " 

:V=-9.9:G0SUB 1828:G0T0 3588 

3818 ? »l:? ttl!? ttlrPSr" OH NO! ACRA 

GE LEFT = ":U=AC: GOSUB 1828:G8T0 3508 

3188 ? ttl:? ttl:? ttl:PS=" CONGRATULATI 

OMS! YOU HAUE RULED UNTIL RETIREMENT! 

":W=-9.9:G05UB 1820:GOT0 3588 
3580 REM it** FIND RATING )HH( 
3518 R=10:IF YR<4 THEN R=1:G0T0 3688 
3528 R=R- CLY-YR3 /2- tl58-HGMM-HGIDJ /lO- 
t9eee-HGML-HGFH3 /1888^ CLHMN+LMID3 /2+ tL 
HFN^LHML)/1888 

3538 R=R+ C44-LY3 /6+ (PP-MAK3 /38e+ CMAK-L 
WPP3 /28e8«LMPP/5884SF/188888 : R=IMT CRJ : 
IF R>18 THEM R=188 
3540 IF R<1 THEN R=l 

3608 RESTORE 3708:F0R C=l TO R:READ RS 
:NEKT C 

3610 ? ttl:? ttl:PS=" HISTORIANS FIND Y 

OU TO BE A RULER <" 

3620 PS 129+ (10-LEN f RS3 3 /2 , 38- f 18-LEN (R 

S3 3/23=RS 

3630 V=-9.9:60SUB 1820:END 

3708 DATA HORRID, POOR, BAD, FEEBLE, FAIR, 

M AVERAGE, N OKAY , GOOD , GREAT, PERFECT 

4888 IF RND(83<0.15 THEN GOSUB 4188 

4818 IF RND(e3<8.1 THEN GOSUB 4208 

4828 IF HWDCBJ<e.l2 THEN GOSUB 4388 

4888 RETURN 

4188 SFFzINTCRND{e3»SFF/3+2«SFF/3J :? tt 

l:PS=" tttttt DROUGHT ! tttttt ":Ur-9.9:GeS 

UB 1820:DR=-1:GOTO 2500 

4200 SFF=INTCRNDfe3*SFF«2+SFF3 :? ttl:PS 

=" tttttt RAINY SEASON ! tttttt ":U=-9,9:G0 

SUB 18Z0:DR=2:GOTO 2580 

4300 PL=IHTtRND(0)»PP/63 :? ttl:PS=" tttt 

tt EARTHQUAKE ! tttttt PEOPLE LOST : ":Ur 

PL: GOSUB 1820:PP = PP-PL 

4318 AL=IMTCRNDC03«AC/4+103 :IF AL>AC T 

HEN AL=AC 

4328 PS-" Loss Of acrage : ":U=AL:G 

OSUB 1820:AC=AC-AL:RETURN 



DrCHECK DATA (see p. 29) 

18 DATA 579,109,594,636,849,36,43,988, 

254,10,513,888,412,894,42,6839 

210 DATA 466,382,488,229,898,789,615,1 

2,168,524,822,395,635,798,834,7959 

330 DATA 4,767,793,869,656,847,831,482 

,647,627,143,35,222,624,779,8326 

430 DATA 638,617,477,654,792,67,824,10 

3,112,24,369,931,36,991,511,7146 

495 DATA 659,3,178,546,498,849,388,491 

,158,722,535,855,296,785,392,7347 

1210 DATA 141,69,432,553,326,939,431,8 

15,265,573,223,602,123,262,872,6626 

1406 DATA 926,38,225,205,125,363,353,4 

83,227,538,804,229,495,959,576,6538 

1920 DATA 461,932,956,433,979,947,431, 

402,678,63,867,768,856,53,613,9431 

2870 DATA 896,196,241,298,565,73,28,96 

6,874,388,704,800,626,876,197,7728 

3580 DATA 341,519,24,385,765,122,513,6 

8,447,193,63,359,518,655,327,5291 

4200 DATA 797,995,11,701,2504 
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WHAT IS D:CHECK? 



Some of the longer program listings printed in A.N.A.L.O.G. are followed by a table of numbers 
appearing as DATA statements, called "D:CHECK DATA". 

D:CHECK, by Istvan Mohos, is a program printed in issue no. 8. It is designed to help disk users find 
and correct typing errors when entering programs from the magazine. 

Readers who would like a copy of issue no. 8 can order it as a back issue by sending $3.00 to the address 
below. Or, if you just want a copy of the D:CHECK article, then send a pre-addressed, stamped, 
business-size envelope to: 



DiCHECK ARTICLE 
P. O. BOX 23 
WORCESTER, MA 01603 







CONTROL CHARACTERS 






Some prog 


ram listings 


reproduced in A.N.A.L.O.G. may contain "strang 


e" characters not shown on | 


the 


ATARI keyboard. 


These are special characters 


which use 


the CTRL, 


ESC 


and "ATARI LOGO" | 


(INVERSE) keys. Shown below is a list of these 


zharacters 


and the keystrok 


es used to 


get them. D 1 


• 


CTRL 


r 






■ 





INUERSE 


CTRL 


M 


h — 


CTRL 


A 


«■ CTRL Z 




■ 





INUERSE 


CTRL 


N 


1 — 


CTRL 


8 


t ESC ESC 




1 





INUERSE 


CTRL 





J 


CTRL 


C 


f ESC CTRL UP-ARROH 


B 





INUERSE 


CTRL 


P 


i — 


CTRL 


D 


« - — ESC CTRL DOHN 


-ARROH 


n 





INUERSE 


CTRL 


Q 


1 


CTRL 


E 


* ESC CTRL LEFT 


-ARROH 


■i 





INUERSE 


CTRL 


R 


/ 


CTRL 


F 


* ESC CTRL RIGHT-ORROM 


•• 
■■ 





INUERSE 


CTRL 


S 


\ 


CTRL 


G 


• CTRL , 




n 





INUERSE 


CTRL 


T 


i 


CTRL 


H 


« CTRL ; 




■ 





INUERSE 


CTRL 


U 


■ 


CTRL 


I 


« ESC SHIFT CLEAR 


1 





INUERSE 


CTRL 


U 


w — 


CTRL 


J 


i ESC BftCK 5 




II 





INUERSE 


CTRL 


M 


I 


CTRL 


K 


» ESC TAB 




"> 





INUERSE 


CTRL 


X 


■ 


CTRL 


L 


C mUERSE CTRL 


M 


1 





INUERSE 


CTRL 


V 


— 


CTRL 


H 


i: INVERSE CTRL 


A 


i: 





INUERSE 


CTRL 


Z 


» 


CTRL 


N 


1 INUERSE CTRL 


B 


□ 




ESC DELETE 




■ 


CTRL 





J INUERSE CTRL 


C 


□ 





ESC INSERT 




4 


CTRL 


P 


:i INUERSE CTRL 


D 


B 





ESC CTRL TAB 


CCLR) 


r 


CTRL 


Q 


a INUERSE CTRL 


E 








ESC SHIFT TAB fSETJ | 


— 


CTRL 


R 


rj INUERSE CTRL 


F 


■ 





INUERSE 


SPACE 1 


+ 


CTRL 


5 


^ — INUERSE CTRL 


G 


■ 





INUERSE 






■ m 


CTRL 


T 


r r— INUERSE CTRL 


H 


a 





INUERSE 


CTRL 


, 


■ 


CTRL 


U 


f INUERSE CTRL 


I 


□ 





INUERSE 


CTRL 


f 


\ 


CTRL 


W 


1 — INUERSE CTRL 


J 


II 





INUERSE 


I 




T 


CTRL 


M 


, L INUERSE CTRL 


K 


Q 





ESC CTRL 2 




J, 


CTRL 


X 


J INUERSE CTRL 


L 


CI 





ESC CTRl 


. BACK 


' S 


1 — 


CTRL 


Y 






u 


^^ 


ESC CTRL INSERT 1 
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QUESTIONNAIRE CONTEST 

Why should our readers send in 
these cards? Because on January 
31, we are going to draw three 
cards at random. These three 
people w^ill receive either a free 
cassette or disk subscription to 
A.N.A.L.O.G./ Send in your 
card today!!! 



I LOVE IT...80C0LUMN CAPABILITY 

FOR MYATARr 




NOW YOU DON'T NEED TO BE LIMITED BY 40 COLUMNS 
FOR YOUR ATARI BUSINESS APPLICATIONS. 

The FULL-VIEW 80 Display Card combines the best of two worlds— 
80-column capability with normal ATARI 40 column/graphics mode. 
80-column mode provides upper and lower case characters with 
full descenders. Price: $349.00 

Add the 32K MEMORY PLUS with the FULL-VIEW 80 to 
achieve a 48K, 80-column system. The 32K MEMORY PLUS 
card operates with both the ATARI 400 and ATARI 800. 

Price: $179.00 

CONTACT YOUR ATARI DEALER OR BIT 3. 

■■IBir3Un 

COMPUTER CORPORATION 

8120'Penn Avenue South, Suite 548 
Minneapolis, Minnesota 55431 
(612)881-6955 




/lEW 80 and MEMORY PLUSai 
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HARDWARE REVIEW: 
BIT-3 80 COLUMN BOARD 

Bit-3 Computer Corporation 
8120 Penn Ave. S.,Suite 548 
Minneapolis, MN 55431 

Retail $349.00 



by Mike Des Chenes 



I never asked for an eighty column board, it was 
just there. Someone mysteriously installed it in my 
office computer while I was on vacation. The fact 
that I use an Amdek green monitor, and never use my 
office system for programming, prompted the staff 
to install the newly-arrived FULL-VIEW 80 — 
column board in my 800. I had thought that 40 
columns on my ATARI were sufficent for my needs; 
word processing, mail lists, and the like. I was forced 
into it from the beginning, but now I'm hooked. 

I'm surprised at the length of time it took before 
someone came out with an 80 column board for the 
ATARI. Now that it's finally here I don't want to 
hear anyone say that the ATARI 800 is not suitable 
for business and professional use. When used in 
conjunction with the Percom drives, a letter quality 
printer and the fully compatible Letter Perfect/Data 
Perfect, you have one of the most versatile and 
inexpensive word processors on the market. 

The Full-View 80 is a card that finally takes 
advantage of the free slot that is available when you 
use one of the 32K boards along with a 16K. I always 
wondered what the big deal was on having a spare 
slot as hyped by the various 32K board 
manufacturers. The 80 x 24 display format is the size 
that the computing industry has established as 
standard, and also helps you to visualize what the 
text will look like when dumped to an 80 column 
printer. The 40 x 24 text and graphic displays are still 
available when using the 80 column card. Also, the 
40 X 24, 80 X 24, and graphic images can all be 
selected for display by use of keyboard or through 
the program. Control and display memory are 
contained on the card. There is no minimum RAM 
required nor is a disk drive necessary. However, you 
can not use a TV set as your monitor. A 
monocromatic video monitor with a green or white 
phospor screen is recommended. 

Installing the board takes only a few minutes. The 
board is plugged in RAM slot 3 with a cable (coming 
from the board), routed out through the rear of the 
computer. The cable is then plugged into the 
monitor plug (on the right hand side of the 
computer), and the monitor is plugged inline on the 
80 column board cable. Once the board is installed, 
you may find it necessary to adjust the contrast, 
brightness, and horizontal/vertical hold on your 
monitor. 



You can load and run programs from any disk with 
the BIT-3 board just as before. Users can also call up 
the DOS menu on the 80 x 24 screen as well as 
listing, editing, writing, and running programs. To 
switch from the 40 to 80 column display when using 
BASIC (MICROSOFT BASIC as well), all that is 
required is that you type in A=USR(54818). This 
USR call can also be used in deferred mode as a 
statement in a program; another nice feature. 

As a previously satisfied 40 column user I must 
admit that after having an 80 column machine, I am 
now spoiled for life. The BIT-3 board does 
everything as advertised and is compatible with a 
good number of software packages. If you use your 
ATARI 800 for anything other than games, then this 
80 column board comes highly recommended. D 



ATARI PROGRAMS 

PROGRAM $49.95 

Duplicate Any Program Tape In Any Format 
(Saves Your Valuable Machine 
Language Programs) 
Automatic Memory Size Adjustment 
Boot Program 

SCREWDRIVER 400 $39.95 

Delete Line Numbers Hex Conversion 



Renumbers 
Memory Analysis 
Change Margins 



Decimal Conversion 
Binary Conversion 
(Runs Thru Basic) 



Machine Language To Data Statement 

6502 ASSEMBLER $24.95 

A 6K Basic Program That Translates 

Assembley Language Mnemonics Into 
Binary Code 
Great For Writing Machine Language 

Programs 
Interprets Machine Language Code And 

Converts To Mnemonic Format 



IS 



• • • • 
INTERFACE SYSTEMS. . . 

1650 WASHINGTON AVENUE 

CHARLOTTE NC 28216 

704-334-8155 

INCLUDE $1.50 FOR POSTAGE 

NC RESIDENTS ADD 4% SALES TAX 

ATARI, 400 ARE TRADEMARKS OF ATARI, INC. 



FIRST and FINEST 

In Systems Software for Atari and Apple 



MAC/ 65 

First we delivered Atari's Assembler/Editor (the 
cartridge). 

Then we produced our enhanced "EASMD." 
Now OSS is introducing the finest integrated 
assembly language development system yet! 
In addition to being ideal for writing small, 
"quick and dirty" subroutines and 
programs, MAC/65 shows its full power and 
speed when used with even the most complex 
of large assembly language source files. 
Naturally, MAC/65 is upward compatible with 
both EASMD and the Atari cartridge. And, of 
course, the object code output is also compati- 
ble with OS/A+, Atari DOS, and/or Apple DOS, 
as appropriate. 
MAC/65 $80.00* 



/■ s 

OS/A+ 

Optimized Systems Software — the group that 
produced both the first Apple DOS and the first 
Atari DOS — now brings you OS/A+,:which 
combines the finest features of these and other 
successful personal computer operating 
systems. 

OS/A+ Is the first and finest operating system 
available for both Apple II and Atari computers 
and features a keyboard-driven, easy-to-use 
command processor. In addition to several 
simple resident commands, QS/A-i- allows logir 
cal and readable requests for even the most 
sophisticated utility commands. In fact, the 
user can even add system commands as 
desired. 

But the real power and flexibility of OS/A-n is 
Its ability to easily interface to devices and disk 
drives of virtually any kind and size. File com- 
patibility (with Apple DOS or Atari DOS, as ap- 
propriate), device independence, batch proces- 
sing, easy of use — OS/A-t- truly brings the 
finest in operating systems to your computer. 
AND NOW OS/A-h (for standard Atari or Apple 
drives) is included as a part of every standard 
OSS language package. Versions of OS/A+ for 
some higher capacity drives available at 
extra cost. 



Unless otherwise noted, all OSS products re- 
quire 48K and at least one disk drive. We re- 
commend 64K for the Apple version of OS/A-I-. 



Speedf?ead-i- 

The first and still finest speed reading tutor 
designed for you to use on your computer is 
available only from OSS. 
SpeedRead+ uses time-proven techniques to 
train you to instantly recognize words and 
phrases, and yet it goes far beyond what mere 
mechanical devices are capable of. 
Sp8edRead+ exercises your peripheral vision, 
improves your eye movement and timing, and 
generally works with you at your pace... now 
and in the future. 

NOTE: The Atari version of SpeedReacl+ needs only 
16K of RAM. 

SpeedRead+ $59.95 



^~ 



tin 



T 



As a product i)f Tiny C Associates, tiny-c was 
the first structured language interpreter for 
microcomputers. Now OSS brings this innova- 
tive interpretive language to your home com- 
puter. While not having the speed and power a 
true C compiler, tiny-c is an excellent choice 
for the programming student who is ready to 
begin learning the valuable techniques of 
structured languages. 

finy-c provides an easy-to-use, easy-to- 
modify environment that encourages ex- 
perimentation while promoting proper pro- 
gramming style. The liny-c package includes 
not only a comprehensive and instructional 
user manual but also complete source. 

tiny-c : $99.95* 



C/65 

NOW AVAILABLE! 
The first native mode C compiler ever produced 
for Atari and Apple computers. 
C/65 supports a very usable subset of the ex- 
tremely powerful and popular C language. Just 
as C is used by the most sophisticated pro- 
grammers from the professional and academic 
communities, so shall C/65 prove to be a pow- 
erful and much-needed tool for 6502 software 
developers. 

C/65 supports integer and character types (and 
arrays), pointers, fully recursive functions, and 
much more. 

NOTE: C/65 requires MAC/65 or an equivalent assem- 
bler. Two disk drives recommended but not required. 

C/65 $80.00* 



"N, 



BASIC A+ 



"From the authors of Atari BASIC..." 

It's a fact! OSS gave you that first and most 
popular language for Atari Home Computers. 
But why be content with the first when you can 
have the finest? 

BASIC A+ Is the only logical upgrade available 
to the Atari BASIC programmer. While retaining 
all the features which make Atari BASIC so 
easy to use, we've also given BASIC A-f fea- 
tures that place it at the forefront of modern 
interpretive languages. BASIC k+ will let you 
explore the worlds of structured programming, 
superior input/output, helpful programming 
aids, and even a very comprehensive PRINT 
USING command. And, exclusively for the Atari 
computer, an almost unbelievable array of 
PLAYER/MISSILE GRAPHICS commands and 
functions. 
BASIC A-H $80.00* 



*REMEMBER: Standard OS/A-t- is included at no extra charge with BASIC A-i-, MAC/65, C/65, and tiny-c. 

ATARI, APPLE II, and TINY C are trademarks ot Atari, Inc., Apple Computer, Inc., and Tiny C Associates, respectively. SpeedRead+, MAC/65, C/65, 
BASIC A+ and OS/A+ are trademarks of Optimized SystemSjSoftware. Inc. 



Optimized Systems Software, Inc., 10379 Lansdale Ave., Cupertino, CA 95014, (408) 446-3099 
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UTILITY#3: DISK TOOL PART 2 



32K Disk 



by Tony Messina 



Here we are again with more disk fun. I hope 
everyone has DISK TOOL up and running and is 
using it to help them understand the information 
presented last issue. Prior to discussing this issues 
topics, I'd like to take you on a trip down Apology 
Lane. As sometimes happens in the publishing 
world, the "Horrendous Hand of Doom" placed its 
palm on page 21, figure 4of the last issue. Bit 3 of the 
status byte breakdown diagram contains FILE IN 
USE. This is incorrect. It should say SPARE. You 
probably also noticed (2 lines below in the STATUS 
NOTE), that the statement "Bits 1,5,6 set" makes no 
sense at all. You're right! ! Actually . . . this statement 
should be placed 2 lines down as the first part of the 
example statement. Example should read as follows: 

Example: Bits 1,5,6 set would mean file was 
created . . . etc. 

For the "3 boot sectors worthy of the program 
Data" error (pg 21, right column, para. 2 last 
sentence), and the missing less than "< ' and greater 
than '>' characters (pg 22, left column, USING 
DISK TOOL paragraph, any number 1 or 720) I 
APOLOGIZE. 

Thanks for bearing with me and I promise to proof 
my articles more carefully. 

ONWARD! 

Last issue I mentioned the Volume Table of 
Contents or VTOC and said I would cover the 
information on it this issue. Well. . .here it is. 
TADAAAA!! Sector 360 contains the VTOC 
(pronounced V-TALK). The purpose of the VTOC 
is to keep track of which sectors of the disk are or are 
not being used. There are basically two important 
parts to the VTOC — the miscellaneous portion 
(BYTES 0-4) and the SECTOR USE MAP (also 
called SECTOR BIT MAP). Bytes 0-4 are used as 
follows: 

Byte = Use byte (it's for DOS 2) 
Bytes 1 & 2 = Total # of sectors (LO/HI format) 
Bytes 3 & 4 = Free Sector Count (LO/HI format) 

The SECTOR USE MAP begins at Byte $0A and 
runs to Byte $63. Each bit of each Byte represents 
one sector on the disk. If the bit is 0, then that sector 
is being used. If the bit is 1 then that sector is 
available or free. Bit 7 of Byte $0A represents sector 
0. Sector does not exist (remember our discussion 
last issue?) Bit 7 of Byte $0A represents sector 1, 
etc . . . all the way to Bit $01 of Byte $63 which 
represents sector $719. Part of my old DISKTOOL 



had a dump of the SECTOR USE MAR It really 
wasn't useful to me and so I dumped it from the 
utility. Once again, I apologize. PRINTOUT 1 shows 
sector 360 of a freshly formatted diskette. Use DISK 
TOOL to examine the MAPS of your own diskettes. 
That covers everything about the structure of a 
disk. Time to discuss this issue's add-ons to 
complete DISK TOOL. 

THIS ISSUE'S ADD-ONS FOR DISK TOOL 

There are three additions to DISK TOOL this 
issue — the Trace file sector chain, Printer dump 
from the screen and Modify sector links. 
Unfortunately, you must have at least 32K if you 
want to add these additional features. For those of 
you with only 16K you can still type in the changes 
and save them in listed form. When you get 32K at a 
later date, just merge them in and away you go. Only 
the changes to DISK TOOL have been included in 
this issue. 

For those of you who missed the last issue, details 
on how to obtain the listings are at the end of this 
article. 

MAKING THE CHANGES 

There are two approaches you may take in 
entering this issue's listings. 

APRO ACH 1 : type in the listings as they appear 
and LIST each out to your diskette. This is the 
recommended approach as you can make use of 
Istvan Mohos's excellent checksum program. Once 
all of the listings have been saved in list form, LOAD 
each segment from the last issue, ENTER in the 
changes from this issue and save the new version out 
to the disk. 

APPROACH 2: Recommended for those who 
don't make any mistakes when typing in listings 
from a magazine. Load in each segment from last 
issue. Type in the listing for that segment exactly as 
given this issue, and save the new program out to the 
disk. 

APPROACH 3: Those of you who receive the 
disk version of A.N.A.L.O.G. can just merge this 
issue's programs with the appropriate listing from 
last issue. 

THE LISTINGS 

LISTING 1 file MLDATA.ENT contains the data 
statements needed for the Machine language 
portions of the Sector trace and Modify links 
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features. This listing needs to be merged with 

Program 2 from last issue. 

LISTING 2 BASCNGl.ENT contains the BASIC 

changes needed to support this issues enhancements. 

It also streamlines some of the original code from last 

issue. This listing needs to be merged with 

PROGRAM 3 from last issue. 

LISTING 3 is the assembly language listing of the 

AUTORUN.SYS file. This should give you a pretty 

good idea of how to reserve some low and memory 

and also how to disable the break key prior to BASIC 

gaining control of the system. 

The DISK TOOL UTILITY source code is not 
shown here due to its extreme length. Readers 
who want a copy of the source code should send 
a large (business-sized) SASE to "DISKTOOL," 
RO. Box 23, Worcester, MA 01603. This listing is 
in MAE (Eastern House Software's Macro Assem- 
bler-Editor) format, and can be converted to other 
formats by the user. I will be glad to answer any 
questions or comments about it. (Please send a 
SASE if you write.) Address it to me in care of 
A.N.A.L.O.G., 565 Main Street, Cherry Valley, 
MA 01611. 

THE TRACE FUNCTION 

Last issue I had you manually trace a file. This is a 
task better suited for the computer and is done by 
pressing T and RETURN on the prompt 
COMMAND OR SECTOR NUMBER. The 
program will ask you to enter the file to trace. You 
may enter a decimal number or a hex number if 
preceded by a $. The program will trace any valid 
file on the diskette and will scream if it doesn't like 
something. It will also display an appropriate error 
message. The sector trace should look like 
PRINTOUT 2. The periods contained in the 
printout will appear as right arrows on your screen. 

THE MODIFY LINK FUNCTION 

CAUTION! This feature is intended to help you 
fix up bad links or rebuild a crashed file. DO NOT 
arbitrarily change sector links all over your disk. If 
you want to experiment, write down the old link 
information prior to zapping it or dump the sector 
you are about to clobber to the printer (if you have 
one) using the P option. To modify links answer M 
to the COMMAND OR SECTOR NUMBER 
prompt. The program will ask you which sector you 
wish to modify. Again, decimal or hex input will be 
accepted. The current links of that sector will be 
displayed. You will then be asked to enter the new 
file number and link pointers. Nothing will be 
changed on the disk until you use the W command 
to rewrite the sector. I always write down the old 
information in case my fix is incorrect. 

THE PRINTER DUMP FUNCTION 

Answering P to the COMMAND OR SECTOR 



NUMBER prompt will dump the contents of the 
screen to your printer. Appropriate error messages 
will appear if you forget to turn on the printer or if 
you don't have one. This dump was written for use 
by an ATARI 825 but should work with all ATARI 
and EPSON printers. 

HINTS ON USING DISK TOOL 

There are no experiments for this issue, as the 
enhancements are pretty straight forward. Some 
hints are in order. In these modern times, with DOS 
2 being available and all that, it is very rare to come 
up with link errors and crashed files. Some errors 
occur however when you try to copy DOS 1 files 
using DOS 2 or you may even run across an old 
program by some obscure, out of business company 
that is loaded with crashed sectors (probably one 
reason why they are out of business). Whatever the 
reason, if you have run into ERROR 164 here is 1 
procedure to follow. 

1 . Isolate the file causing the problem. If this isn't 
obvious, call up the directory and trace each file 
(using the T function) until the culprit is caught. 
Dump the trace to the printer. 

2. Remember the file number. Go to the sector 
previous to the one in error. This is where some 
detective skills will pay off. Examine the sectors 
from your current location to current sector +10 
noting which file they belong to. You will probably 
find your missing sector within this range. I have not 
failed yet. This usually works on diskettes that have 
not had too much disk activity; i.e. a lot of file 
deletions and new file saves. If you run into a toughy, 
don't give up!! You will find your missing sector. 

3. Once found, note the sector number and the 
next sector number. Manually trace it to verify the 
integrity of the file. 

4. Call up the original sector which had the 
incorrect pointer using the M command. Change the 
pointer to the missing sector and write out the sector 
using the W command. 

This sounds like an involved process and in some 
extreme cases it may be, but it sure beats retyping the 
original file. 

OTHER USES 

CHANGING HEADER BYTES ON ML 
OBJECT FILES: You have a relocatable ML file 
which you assembled on page 6. You now want to 
move it someplace else. The old procedure would be 
to load in the assembler, load in the source file, 
change the origin of the file, re-assemble, and save 
the object code. BAH-HUMBUG to that. With 
DISK TOOL simply call up the directory and find 
the start of the Object file. Call up that sector and 
change the header information as per Figure 3 of last 
issue. Re-write the sector and your file will now be 
loaded at the new address. 

The uses for DISK TOOL are left to your 
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imagination. It's saved me a lot of time by allowing 
me direct access to the disk sectors and the 
information on them. I've patched ML programs 
directly, added code and allocated new sectors for 
that code, changed file names that refused to be 
changed by DOS and recovered many valuable files 
that were crashed. Let your imagination run wild. 

WE NEED MORE RESERVED AREA THIS 
MONTH 

In keeping with the old maxim "A program will 
always consume at least 10 more Bytes than are 
available", I found that 1500 bytes was not enough 
room after the additions for this issue were 
implemented (I needed 80 more bytes.) We will use 
DISK TOOL to rescue me. Load in the diskette 
which has DISK TOOL on it and get the TOOL up 
on your computer. Get a directory listing using D 
and find the start sector of the AUTORUN.SYS file. 
Call up that sector. Hit C for change bytes. Move the 
cursor to byte $0B. Change it to $2C. Hit RETURN. 
Call up C for change Byte again. Move the cursor to 
byte $ 13 and change it to $06 (it was $05 ). Hit return 
and write the sector out. You have just added 80 
more bytes of reserve area for a total of 1580. 
PRINTOUT 3 has been included along with some 
comments to help you a bit more. 

PROGRAM BREAKDOWN (BRIEF) 

Here is a brief rundown on the program structure. 

LINES 10-115 give the title and set up the disk 
vector variables. Access to the disk is through a 
ROM routine. The disk lOCB is a separate entity. It 
actually is the Serial lOCB and is used by the printer 
too. More later. 

LINES 130-295 set up the disk lOCB DUNIT 
contains the drive number we want to access. DISK 
TOOL uses drive 1 only but could be modified. 
DCOMM is the disk command location. We can 
GET a sector or PUT a sector hence the value which 
we put in ths location depends on what we want to 
do. Read = 82 and Writes = 87. DAUXl and 
DAUX2 contain the number of the sector we want 
to read or write in LSB/MSB format. Location 722 
and 733 contain the address of where we want the 
sector information to be placed if it's read in. These 
locations also tell the computer where the 
information resides that is to be written. In all cases 
in DISK TOOL, these locations will contain $FD 
$03 LSB/MSB which happens to be the cassette 
buffer. The other variables are commented as to their 
meaning. 

LINES 330-332 are a subroutine to check if the 
sector number to read or write is within the range of 
1-720. 

LINE 340 is a subroutine that breaks up the sector 
into LSB/MSB format. 

LINES 370-610 handle the command prompt and 
responses. If none of the responses in lines 380-460 



are found, the program assumes just ENTER was hit 
and reads in the next sector. 

LINES 630-690 wrap the sectors around to 
prevent an error message. 

LINE 710 is our trap line. Any entry error not 
covered by specific routines will come here. 

LINES 730-990 contain the WRITE TO DISK 
code. It is executed when the W command is 
requested. 

LINES 1010-1210 contain the CHANGE BYTES 
code. It is executed when the C command is 
requested. 

LINES 2000-2090 are the HELP MENU. 

LINE 3000 is a subroutine used by the change 
bytes routine to scroll the bottom of the screen up 5 
lines. 

LINES 4000-4100 contain a Hex to decimal 
conversion routine. This is called whenever a $ 
preceeds a numeric entry. 

LINES 5000-5075 contain the DIRECTORY 
DUMP code. It is executed when the D command is 
requested. 

LINES 6000-6050 Contain the PRINTER 
DUMP code and is called when the P command is 
requested. 

LINES 6500-6640 contain the MODIFY LINKS 
code and is called when the M command is 
requested. 

LINES 7000-7125 contain the SECTOR TRACE 
code and is called when the T command is requested. 

THE END (?) 

That wraps it up for this utility. I hope you 
enjoyed it and learned something about disk 
structure as well as how to save any future crashed 
files. Again. . .please feel free to write if you have 
any questions or comments about the direction of 
this series. Remember .. .this is your magazine!!! 
Until next issue . . . Happy Tracing! D 

(l^ote: Readers who would like to obtain Part i of 
DISK TOOL may order issue no. 8 o/A.N.A.L.O.G. 
Computing by sending $3.00 to: A.N.A.L.O.G., P.O. 
Box 23, Worcester, MA 01603). 

PRINTOUT 1 

HEX ATA3CI 

C3 92 00 00 00 .C.C 

FF FF FF FF FF 

FF FF FF FF FF 

FF FF FF FF FF 

FF FF FF FF FF 

FF FF FF FF FF 

FF FF FF FF 00 

FF FF FF FF FF 

FF FF FF FF FF 

FF FF FF FF FF 

FF FF FF FF FF 



>$00 


02 


C3 


02 


>$08 


00 


00 


0F 


>*10 


FF 


FF 


FF 


>*18 


FF 


FF 


FF 


>*20 


FF 


FF 


FF 


>$28 


FF 


FF 


FF 


>*30 


FF 


FF 


FF 


>*38 


7F 


FF 


FF 


>*40 


FF 


FF 


FF 


>$48 


FF 


FF 


FF 


>*50 


FF 


FF 


FF 



THE LEARN NG CENTER 



"Perhaps the finest educational software that I have ever had the 

pleasure of reviewing. It's easy for kids to use and effective in teaching 

basic concepts and skills.... My kids are learning with it right now!" 



Fred D'Ignazio, Educational Editor— Compute/, Associate Editor— Soffs/de, 
Author of bestseller- /(bft'e and the Computer 

We hope you've been using your ATARI for more than Just gomes ... it is, and can be, a valuable educational tool for 
you and your children. 

Bruce and Dionne Mitchell realized this potential and designed a series of programs for use in their Small World 
Preschool & Kindergarten located in Durham, N.C. Presented on TV's PM Magazine these unique educational programs 
will introduce your 3-9 year olds to the era of learning with computers. Using the graphics and sound capabilities of the 
Atari, each program develops a particular skill and reinforces correct responses with happy faces and music. 

Beginning with basic concepts such as colors, shapes and the alphabet, your child will progress to an understand- 
ing of counting, arithmetic, and language skills. 

Widely acclaimed, classroom designed and tested, these unique educational tools are now available to you ... for 
your children. 



SPECIAL SKILLS 



* Color For The Non-Reader 



* Nome That Color 



• Like Shaoe dentification 



* Different Shaoe Identification 



Cave Game 



MATH AND NUMBER SKILLS 



Count With Me 



Number Recoanition 



Addton 



Subtraction 



Add.— Vertical Horizontal 



Sub.— Vertica Horizonta 



Advanced Addition Subtraction 



Ones and Tens 



LANGUAGE SKILLS 



• A Dhabet Recoanition 



• Letter Seauence 



* Like Svmboi Discrimination 



* Different Symbol Discrimination 



Preschool 




Pricing Information 



Single Program 

Special Skills 

Language Skills 

Math and Number Skills. 

Complete Set 

Ed u mate™ Light Pen 



Pre-School 

Kindergarten . . 
First Grade. . . . 
Second Grade 



Add $2.00 for postage & handling 



Cass. 


Disk 


36.95 . 


. .41.95 


54.95 . 


. .59.95 


49.95 . 


. .54.95 


2195 . 


. .26.95 



• Compatible with our Edumate™ Light Pen 
NOTE: All software requires 8K cassette/16K disk 

Start competing with your 4-year-old for computer time. Enroll in THE LEARNING CENTER, it could be the best 
investment you ever make ... /n your children's future. See your local dealer or order direct. 

THE PROGRAMMER'S INSTITUTE 

-a division of FUTUREHOUSF"^ 



Available now for the 
ATARI 400/800 



COMING SOON for the 

TRS-80 Model I, III, Color 

Apple, VIC, TI-99 

Free Catalog Upon Request 



P.O. Box 3191 Dept L 
Chapel Hill, NC 27514 



1-919-967-0861 



10 am - 9 pm, Monday - Saturday 
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>*58 FF FF FF FF FF FF FF FF , 

>»60 FF FF FF FF 80 68 88 88 

>t68 80 88 80 88 88 88 88 88 

>$7e 88 88 88 88 88 88 88 88 

>f78 88 88 88 88 88 80 88 88 

SECTOR ==>360 NEXT SEC==>0 

FILE«=>0 

VTOC OF A NEW DISK WITH DOS 2 



PRINTOUT 2 

SECTOR TRACE 
; DMPUNIM SRC START SECTOR 
,tl0C.*I0D.*18E,*18F.*118.*lll 
,$114.*115.*116.*n7.*118.*119 
,*11C.*11D.*11E.*11F.*128.*121 
,*124.*125.*126.*127.*128.$129 
,*12C.*12D.*12E.*12F.*130.*131 
,*134.*135.tl36.*137.«138.*139 
,*13C.*13D.*13E.*13F.*140.*141 
,*144.*145.*146.*147.*148.*149 
,*14C.*14D.*14E.*14F.*150.*151 
.*154.*155.*15<S.*157.$158.*159 
,*I5C.*15D.*15E.*15F.*168.*161 



FILE 
$18B 
*113 
*11B 
*123 
»12B 
*133 
*13B 
*143 
*14B 
*153 
*15B 
*163 
*174 
*17C 
*184 
*I8C 



,$144.*165.*166.*167.*171 .$172 
.$175.*176.$177.*178.$17?.*17A 
.*17D.*17E.*17F.*188.tl81 .*182 
.*185.*186.*187.*138.*189.tl3A 
.tl8D.$18E.*18F END 

PRINTOUT 3 



:$ieA 
.$112 
.*11A 
.$122 
.*12A 
.*132 
.*13A 
.$142 
.*14A 
.$152 
.*15A 
.*U2 
.$173 
.*17B 
.*183 
.$18B 



BYTES 








HEX 








ATASCI 


>$e8 


FF 


FF 


80 


06 


4A 


86 


18 


AD 


a 


..J..- 


>$88 


E7 
E8 
80 
A0 


82 
82 
85 
78 


69 
69 
08 
AD 


2C 
06 
EA 

16 


8D 
8D 
EA 
02 


E7 
E8 
EA 
8D 


02 
02 
4C 
3C 


AD 
A9 

00 

86 




_ 


>f 18 




......) 


>*18 




. . . .L. 


>*2e 




-...<. 


>*28 


AD 


17 


82 


8D 


3D 


06 


A9 


34 


- 


..= .M 


>*30 


8D 


16 


02 


A9 


06 


8D 


17 


82 


, 


.) 


>*38 


58 


68 


48 


AD 


0E 


D2 


10 


84 


X 


H-.R.. 


>*4e 


68 


4C 


3B 


06 


A9 


7F 


8D 


8E 


.1 


_!■/••■ 


>*48 


D2 


A5 


10 


8D 


0E 


D2 


68 


40 


R/ 


i...R.3 


>*5e 


88 
02 
13 


E2 
El 
20 


82 
02 
AB 


E3 

00 

20 


82 
06 
41 


08 

00 

4E 


06 
15 
41 


E0 
0F 

4C 






>*58 






>$6e 


'. 


+ fi^NAL 


>*68 


4F 


47 


28 


34 


30 


30 


2F 


33 


OC 


5 400/8 


>*7e 


38 


38 


20 


AB 


16 


19 


88 


24 


0( 


) +...* 


>*78 


24 


28 


IC 


0E 


40 


IC 


88 


5D 


*( 


. , 9 . . . 


SECTOR == 


=>2: 


54 






NEXT SEC= 


==>0 


FILE«= 


= >7 


















AUTORl 


^vJ.SYS 


SECTOR 


; FOR DSKTOOL 






CHANGE BYTE 


*B 


TO 


*2C 










CHANGE BYTE 


*13 TC 


) *06 










NOTICE BYTES *1B-*1D 


ARE *EA <NC 


)P) 


DO THIS 


[F ■• 


rou 


DON'T 


WAhJT THE 






BREAK 


KEY DISABLED. 













MAKE SURE YOU WRITE THIS SECTOR 

BACK TO THE DISK USING THE 'W^ COMM^D 



LISTING 1 



288 DATA 32,0,0,0,32,83,228,16,3,76 

282 DATA 52,29,32,10,32,76,75,29,173,1 

44 

284 DATA 29,42,42,13,143,29,141,122,4, 

76 

286 DATA 75,29,173,122,4,72,41,3,141,1 

43 

288 DATA 29,104,74,74,141,144,29,96,17 

3,234 

298 DATA 34,240,4,104,76,169,32,184,10 

4,141 

292 DATA 11,3,104,141,10,3,104,133,206 

,104 

294 DATA 133,205,104,104,141,237,31,32 

,83,228 

296 DATA 16,3,76,201,34,162,11,168,15, 

177 

298 DATA 205,157,214,31,136,202,208,24 

7,177,205 

300 DATA 141,11,3,136,177,285,141,10,3 

,136 

302 DATA 177,205,141,229,31,136,177,20 

5,141,228 

304 DATA 31,136,177,205,240,20,141,230 

,31,44 

306 DATA 238,31,16,28,32,192,33,142,13 

8,29 

388 DATA 32,193,34,76,76,29,162,34,168 

,91 

310 DATA 32,139,33,173,237,31,32,162,3 

0,76 

312 DATA 22,33,162,33,160,212,32,139,3 

3,32 

314 DATA 192,33,162,33,160,219,32,139, 

33,173 

316 DATA 11,3,32,27,35,173,10,3,32,162 

318 DATA 30,160,16,148,229,34,169,155, 

32,164 

320 DATA 246,162,7,142,228,34,32,83,22 

8,16 

322 DATA 3,76,281,34,32,10,32,238,235, 

34 

324 DATA 208,3,238,236,34,173,144,29,2 

05,237 

326 DATA 31,208,35,173,123,4,13,143,29 

,240 

328 DATA 81,32,179,33,32,237,34,206,22 

8,34 

330 DATA 16,218,169,1,141,26,35,206,22 

9,34 

332 DATA 16,198,141,234,34,76,76,29,32 

,198 

334 DATA 31,162,34,160,8,32,139,33,32, 

55 

336 DATA 38,173,11,3,32,27,35,173,18,3 

338 DATA 32,162,30,162,34,168,34,32,13 

9,33 

348 DATA 169,1,141,138,29,141,26,35,16 

9,0 

342 DATA 141,235,34,141,234,34,141,236 

,34,76 

344 DATA 76,29,173,228,31,77,235,34,28 

8,31 

346 DATA 173,229,31,77,236,34,288,23,1 

41,235 

348 DATA 34,141,236,34,162,34,168,114, 

32,139 

358 DATA 33,169,155,32,164,246,169,1,7 

fi 7 7 

352 DATA 33,162,34,168,119,32,139,33,1 

73,229 

354 DATA 31,32,162,38,173,228,31,32,16 

2,38 

356 DATA 162,34,160,145,32,139,33,173, 

236,34 

358 DATA 32,162,30,173,235,34,32,162,3 

0,162 
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360 DATA 

1,235 

362 DATA 

8,29 

364 DATA 

,34,140 

366 DATA 

73,23e 

368 DATA 

143,29 

378 DATA 

143,29 

372 DATA 

6 

374 DATA 

164 

376 DATA 

39,96 

Z7e DATA 

380 DATA 

382 DATA 

384 DATA 

386 DATA 

,32 

388 DATA 

398 DATA 

392 DATA 

394 DATA 

396 DATA 

398 DATA 

53 

488 DATA 

402 DATA 

484 DATA 

9 

406 DATA 

408 DATA 

410 DATA 

412 DATA 

414 DATA 

416 DATA 

418 DATA 

420 DATA 

422 DATA 

424 DATA 

168 

426 DATA 

7,32 

428 DATA 

10 

438 DATA 

6,75 

432 DATA 

434 DATA 

436 DATA 

46 

438 DATA 

3,143 

448 DATA 

38 

442 DATA 

9 

444 DATA 



34,168,171,32,139,33,169,8,14 

34,141,236,34,76,22,33,173,14 

141,238,34,173,149,29,141,231 

148,29,142,149,29,32,145,29,1 

34,141,148,29,173,231,34,141, 

174,232,34,172,233,34,96,173, 

141,11,3,173,123,4,141,18,3,9 

162,8,189,215,31,32,36,38,32, 

246,32,43,38,232,224,11,144,2 

70,73,76,69,58,32,8,32,32,32 

32,32,83,84,65,82,84,32,83,69 

67,84,79,82,58,36,8,32,73,83 

32,68,69,76,69,84,69,68,33,33 

253,253,155,8,155,78,73,76,69 

78,85,77,66,69,82,32,77,73,83 
77,65,84,67,72,32,65,84,32,83 
69,67,84,79,82,27,31,8,155,67 
72,69,67,75,32,88,82,69,86,73 
79,85,83,32,83,69,67,84,79,82 
32,76,73,78,75,83,33,33,253,2 

8,67,65,78,78,79,84,32,82,69 

65,68,32,83,69,67,84,79,82,58 

27,31,36,253,0,155,78,79,32,6 



78,84, 
73,76, 
78,68, 
65,76, 
67,79, 
65,67, 
84,79, 
68,27, 
84,32, 
79,82, 



82,89, 
69,27, 
0,155, 
32,83, 
85,78, 
84,85, 
82,83, 
31,36, 
70,73, 
33,33, 



32,70,79, 
31,36,253 
79,82,73, 
69,67,84, 
84,27,31, 
65,76,32, 
32,76,79, 
0,155,83, 
76,69,32, 
253,155,0 



82,32,70 
,0,32,69 
71,73,78 
79,82,32 
36,0,155 
83,69,67 
65,68,69 
72,79,82 
69,82,82 
,162,33, 



239,32,139,33,96,162,34,160,6 

139,33,173,11,3,32,27,35,173, 

3,32,162,30,169,155,32,164,24 

22,33,0,0,0,0,0,0,0,0 

0,32,36,30,173,26,35,240,6,32 

55,30,76,8,35,169,27,32,164,2 

169,31,32,164,246,32,55,30,17 

29,32,27,35,173,123,4,32,162, 

169,0,141,26,35,96,1,32,255,2 

32,243,29,96,0,0,999 



D:CHECK DATA (see p. 29) 

280 DATA 884,653,292,203,948,592,619,6 

63,402,7,566,46,718,679,620,7884 

310 DATA 391,578,765,174,748,707,251,7 

68,696,432,572,711,297,82,689,7861 

340 DATA 549,839,411,698,704,623,721,6 

54,889,594,512,596,987,925,870,10572 

370 DATA 890,96,366,865,980,221,22,292 

,482,295,247,250,271,303,686,6266 

400 DATA 71,247,388,218,234,222,226,23 

2,248,264,204,209,531,440,504,4238 

430 DATA 398,318,141,308,887,281,369,4 

25,3119 



LISTING 2 

70 DIM A$C4e),AN$tl) 

115 G05UB 150 

190 POKE DAUK1,SECL0M 

210 POKE DAUX2,SECHI 

295 RETURN 

338 SECMUM-VALCASJ ' ^ f . ^^pENmiU OR SECH 

UlHi^ttM'tBWilin " ! POP : GOTO 370 '"■^UJ 

332 RETURN 

340 SECHI=INTCSECNUM/256} :SECL0M=IHY t5 
ECNUM-tSECHI»256>3 : RETURN 

371 REM **«DELETE LIME 371 JHHt 

372 REM WHfDELETE LINE 372 *** 

430 IF A$="M" THEM GRAPHICS 0:G0SUB 75 

e:GOTO 378 

435 IF A|="P" THEM GOSUB 6008: GOTO 370 

450 IF AS="C" THEN GRAPHICS 0:GOSUB 10 

30: GOTO 370 

454 IF AS="T" THEN GOTO 7000 

456 IF AS="'M" THEM GOTO 6508 

470 GOSUB 330 

498 GRAPHICS 0: GOSUB 5508: GOSUB 340 

750 POKE 710,64:P0KE 7O9,10:POKE 712,1 

1030 POKE 7ie,26:P0KE 709,0:P0KE 712,1 

2830 ? tt6; "DIRECTORY LIST":? tt6;"{l]RIMT 

CURRENT SCRN" 
2040 ? tte ;"DRACE SECTOR CHAIN":? tt6;"ll 

ODIFY SECTOR LINKS" 

3000 POSITION 0,17:? "EXBI]" : POSITION 

8, 17; RETURN — — 

3010 REM *HHf DELETE LINE 3010 «»» 

3030 REM »»» DELETE LIME 3830 ««» 

5885 GRAPHICS 8: GOSUB 5500 

5500 POKE 712,10:P0KE 709,O:POKE 710,2 

14: RETURN 

6000 TRAP 60 50:LPRINT :LPRINT 

6085 ? "^ l!J;Hi;i*<;itlH ilrm:igirTii1" ■ "fttfF 

710,186 
6010 SCAND=PEEKt88)4PEEKC89}«256 
6015 REM »»PRINT SCREEN TO PRINTER »» 
6020 FOR X=l TO 19 
6825 ARPT=1 
6838 FOR Y=SCAND TO SCAND+39 

6832 A$tARPT,ARPT]=CHR$(CASC(" "J+PEEK 
CYJ J ) : TEMP=ASC (AS CARPT , ARPT3 J 

6833 IF TEMP>128 THEN TEMP=TEMP-128 : AS 
(ARPT,ARPT)=CHRS(TEMP) 

6835 IF AS CARPT. ARPTJ<" " OR A$(ARPT,A 
RPTI>"Z" THEN AS(ARPT,ARPT)="." 

6837 ARPT=ARPT^l:NEKT V 

6838 IF ASC20,21I="EC" THEN GOTO 6045 
6040 LPRINT A$:SCAND=SCAND+40:NEKT K 
6045 POKE 710,214:TRAP 710: AS="": GOSUB 

150: RETURN 
6050 ? "K; 
GOTO 6045 
6508 ? "K 

t ; t 

INPUT A?" 

6585 IF AS="" THEN GOTO 370 

6510 IF ASC1,1)="S" THEN GOSUB 4080 

6520 GOSUB 330 

6530 GOSUB 340: GOSUB 150 

6535 X=USR (81743 

6548 IF PEE K(7562J THEN GOTO 550 

;^0?:?.."'l*ll^BB";PEEK(7568J,":[niaOl 
H<aiil;a>3 "; (PEEK(7567JK256J+PEEKri iItT 
6555 ? : ? ■■ M:i<i;»Mi ; BAi%J M IflJJh 1 .M ! iVA 
";: INPUT fls' ^'"-"— ' ■■ ' ■^'^■^^■aii'M um i i'^it t 

6568 IF AS-"" THEN FILzPEEK (7568) : GOTO 

6590 
6570 IF AS(1,1)="S" then GOSUB 4000 
6580 FIL=gAL(AS) 

^^y^F.PJ^L M3PP}. • FIL : ? :? "I13I1MII19E 

HtiiM<;i*Mii;Ma JIM " ! : tmpiit aS 

6595 IF AS="" THEN GOTO 370 

6600 IF AS(1,1J="S" THEN GOSUB 4000 

6610 GOSUB 330 

6620 GOSUB 340: POKE (7567) , SECHI : POKE 

(1147),SECL0M 

6625 H=US R(8188) 

OHB ";PEh KC>bb8) :" ^jmirfifcM. B ■■ ?? 



PRINTER DOESN'T RESPOND !! ISIS 



MODIFY SECTOR LINKS 
SECTOR TO MODIFY (HEX OR DEOOi 
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WRITE TO DI5K IF CHANGES 



PEEK C7567>»256J +PEEK tll47J 

6635 5ECNUM=PEEK CDAUXl) +PEEK CDAUK2}«25 

6 

6640 ? :? " 

ffiOaiai":? :G0T0 370 

7000 ? "^INPUT FILE NUMBER CHEX OR DEC 

>":? '■►OR E3 TO ftBORT"j -.INPUT AS 

7010 IF fl$Cl,l)="X" THEM GOTO 370 

7820 IF ftS(l,13="$" THEM G05UB 4880 

7030 FIM-UflL (fiSJ : ST5EC=IMT f FIM/8> +361 : 

IF 5TSEC<361 O R 5TSE0368 THEM ? " HJEB 

■3nacniioiinzQ":GOTo 370 

7835 RELFI=FIM-CIMTCFIM/8J*8J 

7840 IDX:= (RELFI*16J + 1821 

7842 ? "IS^ t.1jWliiljP|l;lg tga" 

7850 X=USR t8218 , STSEC , iW, FTMJ 

7855 IF PEEKt7562J THEM POKE 7562, 8 :P0 

KE 8173,8:? :G0T0 378 

7860 5ECL0M=PEEK 111473 : SECHI=PEEK C7567 

) 

7870 IF MOT PEEK C8538) THEM POKE C817 

33, 8: GOTO 370 

7880 ? :? "0 TO CONTIM QRIMT SCRM <RET 

> TO STOP": rIMPUT ttMS 

7898 IF AMSr"" THEM POKE 8938,8:P0KE 8 

173, 8 .-GOTO 378 

7180 IF flMS="P" THEM G05UB 6000: GOTO 7 

880 

THEM POKE 8938,0:P0KE 



7110 IF flMS<>"+" 
8173,8:G0T0 718 
7115 ? "I5> ~ 
7120 X=U5RC82183 
7125 GOTO 7055 



SECTOR TRACE (CONT) 



DtCHECK DATA (see p. 29) 

78 DflTfl 256,966,888,811,615,288,697,55 

7,692,875,98,531,242,549,303,8360 

478 DATA 989,796,528,582,475,868,435,5 

1,795,316,960,248,823,41,996,8995 

6820 DATA 381,667,863,445,778,286,274, 

272 , 894 , 339, 356 , 922, 232 , 842 , 752 , 8295 

6530 DATA 135,100,884,962,124,191,848, 

321,28,259,844,754,413,108,884,6855 

6635 DATA 492,888,795,882,830,683,898, 

937,768,282,245,29,219,212,259,8331 

7108 DATA 10,420,269,237,27,963 



ASSEMBLY LANGUAGE LISTING 

] 

] 0005; «*»«»»»»»♦»»»*♦»»»»»»»»*»#»» 

0010;* AUTORUN.SYS SOURCE CODE * 
0015;» FOR DSKTOOL UTILITY RV3 » 
0020; » BY: TONY HESSINA * 
0025;* 48 DUDLEY AVE » 
0030;* NEIIPORT,RI 02840 * 
0035; » » 

0040; » THIS FILE RESERVES 1500 ♦ 
0045;* BYTES OF RAH BY H0VIN6 THE * 
0050;* HEHLO POINTER UP BEFORE ♦ 
0055;* THE BASIC OR ASSEMBLER CART* 
0060;* SETS CONTROL OF THE SYSTEM.* 
0065;* * 

0070;* THIS CODE ALSO DISABLES THE* 
0075;* BREAK KEY TO PREVENT ANY * 
0080;* POSSIBLE USER ERRORS FROH * 
WV,* HftPPEHlMG. * 

0090; 

0095;* PROGRAM BASED ON IDEAS * 
0100;* PRESENTED IN DE RE ATARI * 
0105;* pes 8-11 i 8-15 * 

01 10; ****************************** 



0115; 






0120; ***«*»*****» 




0125;* EQUATES » 




0130j»**i****»»*»« 




0135; 






0140MEMLOL 


.DE $02E7 


; LO BYTE NEMLO 


0145HEHL0H 


.DE t02E8 


; HI BYTE ICNLO 


OlSONARHST 


.DE tOOOS 


; NARSTART FLAG 


015SCARVEC 


.DE tAOOO 


; CART START VECTOR 


0160SAVBYT 


.DI 1500 


t OF BYTES TO RESERVE 


0165P0KMSK 


.DE $0010 


; POKEY IRQ MASK 


0170IR8EN 


.DE tD20E 


IRQ ENABLE BITS 


0175IRfiST 


.DE IRQEN 


; IRQ STATUS 


oisovniRQ 


.DE t02i6 


SYSTEM IRQ VECTOR 


0185; 






0190;************* 




0195;* CONTROL » 




0200; ************* 




0205 


.BA t0600 


ORIGIN $0600 


0210 


.LS 


■ 6INNE LISTING 


0215 


.OS 


OBJ CODE TO MEN 


0220; 






0225; ************* 




0230;* PROGRAM * 




0235; ************* 




0240;**** RESERVE 1500 BYTES »*»* 




0245; 






0250STRES 


CLC i 


CLEAR FOR ADD 


0255 


LDA NENLOL 


GET CURRENT MENLO LO BYTE 


0260 


ADC tL,SAV6YT , 


ADD 1500 LO 


0265 


STA NENLOL 


STORE 


0270 


LDA MEHLOH ; 


GET CURRENT HENLO HI 


0275 


ADC IH.SAVBYT 


ADD 1500 HI 


0280 


STA MEHLOH ! 


STORE IT 


0285 


LDA too 


HARHSTART RESET 


0290 


STA *HARNST i 


STORE 


0295 


JSR SHAPEH 


DO BREAK KEY STUFF 


0300 


JHP CARVEC i 


JUMP TIffiOUGH CART 


0305; 






03 1 0; ************************ 




0315;* SNAP IRD VEC ROUTINE * 




0320;* TO POINT TO OUR ONN * 




0325;* ROUTINE. HE HILL 16- » 




0330;* NDRE THE BREAK KEY. » 




0335; ***>***********»*******> 




0340; 






0345;*** 1ST PUT SYS IRS IN OUR STUFF 


*<* 


0350; 






0355SHAPEH 


SEI ; 


STOP IRS'S FOR NOH 


0360 


LDA VHIRQ 


GET SYSTEM IRQ LO ADDR 


0365 


STA SYSIRO+1 ; 


MODIFY JHP LO 


0370 


LDA VHIRB+1 


GET SYS IRQ HI ADDR 


0375 


STA SYSIRe+2 ; 


MODIFY JMP HI 


0380; 






0385;*** NON PUT OUR IRQ HANDLER AODF 


tESS ♦** 


0390;*** INTO THE SYSTEM VECTOR LOCAl 


riON **• 


0395; 






0400 


LDA IL.OURIRQ ; 


GET ADDR LO 


0405 


STA VMIR6 ; 


STORE AS SYS VEC 


0410 


LDA IH.OURIRQ ; 


GET ADDR HI 


0415 


STA vniRCKi ; 


STORE IT TOO 


0420 


CLI ; 


NOH ALLOH INTERUPTS 
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0425 RTS 

0430; t»»»titf *l»tf «tf tHHftH»t» 

0435;* THIS IS THE ACTUAL IR8 ♦ 
0440;* SERVICE ROUTINE. ALL IK t 
0445;* DO IS CHECK FOR A BREAK * 
0450;* KEY. IF BREAK IS HIT, HE t 
0455;* CAUSE THE SYSTEH TO JUST * 
0460;* I8NDRE IT AND THEN RETURN* 
04&5 ; ttf **tt**t*»***t*«f*»(*f **(« 
0470aURIRS PHA 
0475 LDA IRQST 
0480 BPL TISBRK 
0485 PLA 
0490SYSIRS JNP SYSIRQ 
0495; 



; AND RETURN 



; SAVE A 

; MAS THIS A BREAK?? 

; YES IT IS!! 

; NO SO PULL A 

; AND CALL SYSTEH ROUTINE 



0500;*** BREAK KEY HIT SO SQUASH *♦♦ 
0505;*** THIS HAHA & STOP DOOH!! ♦*» 

0510; 

0515TISBRK LDA «7F ; WIPE BRK BIT 
0520 STA IRQST ; PUT IN STATUS 
0525 LDA tPOKMSK ; GET POKEY HASK 
0530 STA IRQEN ; AND STUFF 
0535 PLA ; PULL A 

0540 RTI ; AND RETURN FROM INTERUPT 

0545; »**»**»»***»» 
0550;* END PROS * 
0555; ***»»**»*»*»* 

05i0 .EH ; THE END 

// 



SOFTWARE REVIEW: 
MONKEY WRENCH 

Eastern House 
3239 Linda Dr. 
Winston-Salem, NC 27106 
ROM Cartridge $49.94 



by Tom Hudson 



I'm sure there are a number of ATARI 800 owners 
out there who are wondering why their machines 
have an extra ROM cartridge slot. After all, 
practically every cartridge available for the ATARI 
computers is meant for the left cartridge slot. This is 
done so that the cartridges can also be used in the 
ATARI 400 computer system, which only has 1 
ROM socket. 

The MONKEY WRENCH cartridge by Eastern 
House Software is designed to be used in the right- 
hand cartridge slot of the 800 (it cannot be used in 
the 400). The cartridge can be used by itself or in 
conjunction with BASIC (two cartridges in the 
computer at the same time!). 

When used with BASIC, the MONKEY 
WRENCH gives BASIC 9 more commands, listed 
below. 

Auto line numbering lets BASIC number your 
program lines as you enter them. This allows you to 
concentrate on your program code rather than which 
line comes next. 

You can delete a range of line numbers, a job that is 
normally tedious at best, especially when you have to 
delete a 50-line subroutine! 

TTie screen margins can be set easily without 
POKES. 

One of themore interesting commands. Exchange 
Cursor Keys, allows the use of cursor control (UP, 
DOWN, LEFT, RIGHT) without having to press the 
CTRL key. This is a handy function if you do a lot of 
screen editing. 



Decimal to hexadecimal and hex to decimal 
conversion allows you to convert base 10 to base 16 
and vice-versa. If you need to convert system 
memory addresses to decimal, these are the- 
commands you need. 

The MONKEY WRENCH contains a 15- 
command machine-language nionitor which can be 
accessed at any time, and is extremely powerful. It 
allows you to display and alter memory in hex and 
ATASCII formats, display and alter the 6502 
registers, save and load memory to cassette, search 
memory for specific data, disassemble and alter 
machine-language routines, execute machine- 
language programs, and more. 

Another plus for this cartridge is the built-in 
memory test feature. This function performs an 
exhaustive test of a specified area of memory and 
notifies you of any bad locations. 

Finally, and what is probably one of the 
MONKEY WRENCH'S handier functions is the 
BASIC program renumber feature. This feature is 
very easy to use, and extremely fast. 

The MONKEY WRENCH cartridge is an 
excellent tool for any serious programmer, whether 
working in BASIC or assembly language. 

I only have a couple of minor complaints about 
this product. First, it uses page 6 of memory for its 
RAM work area. Page 6 is one of the few areas in 
RAM available to the user, and any machine- 
language routines set up by the user would have to be 
located elsewhere. 

Second, when entering hex addresses in the 
Machine-Language Monitor, the user must enter all 
leading zeros. For example, if it is necessary to see 
location $D6, the address must be entered as 0OD6. 
At most, this is a minor inconvenience, most 
probably a necessary evil due to the fact that the 
entire MONKEY WRENCH is crammed into just 
4K. 

Considering all the time the MONKEY 
WRENCH can save ATARI users, and the 
reasonable price of $49.95, I can recommend this 
cartridge to all serious ATARI 800 programmers. 



ATTENTION ATARI* OWNERS 

fASTCHIP 

A CUSTOM FLOATING POINT ROM 
FOR ATARI 400/800* 

from: Newell Industries 

FUSTCHIP can give you up to thr«« and 1/2 ti«c»s th« sp««d of th» 
original -floating point routines. Atari* BASIC uses these routines 
-for almost everything. You can see the di-fference. 

FASTCHIP is a pin compatible masked FtOM that replaces the 
original rofli. It can be installed as -fast as two minutes (Atari 
800») , -fifteen minutes <Atari 400«) , and is a permanent replacement 
-for the original rom. There are no modi -fi cations, cuts, or wires to 
add. Just rGNBOve the original rom and plug in the FASTCHIP rom. 
Installation instructions included. 

FASTCHIP comes with a 90 day full warranty. Return undamaged 
during this period for a full refund. 

Check with your local computer store or send *41.9S each, check 
or money order to NEWELL INDUSTRIES, 3340 Nottingham Ln. , Piano TX. 
75D74. Texas residents add 5% sales tax. C.O.D. orders add 41. SO. 

Now availible for immediate delivery. Call 214-423-1781 or write 
for additional information. Dealer inquiries welcome. 

Also distributed by Jersey Systems, 800-526-3647 



* Trademark of ATARI INC. 



THE MONKEY WRENCH FOR ATARI 



$49.95 

(See the many 

reviews.) 



A BASIC and machine language 
-*jj.,§/ programmers aid for 800 users. 
fJ.Li ^ Plugs into right slot and works 

^^nV with ATARI BASIC. Adds 9 new 

V^j^ direct mode commands in 

^ eluding auto line numbering, 

delete lines, change margins, 
memory test, renumber BASIC 
hex/dec conversion, cursor ex 
change, and machine language 
monitor. 
The monitor contains 15 commands used to interact with 
the B5D2. Some are display memory/registers, disassem- 
ble, hunt compare, hex/dec convert transfer memory. 
Uses screen editing. 

MACHINE LANGUAGE MONITOR 
FOR ATARI USERS 

A must for anyone interested in machine language and 
wanting to know more about how the computer works. 
Provides 21 easy to use commands. Uses screen editing. 
Cassette - $24.95 Diskette - $29.95 
TYPING EXERCISE 

A great educational program. Consists of typing drills 
and timed typing tests. Diskette - $12.95 




ATARI AND PET 
EPROM PROGRAMMER 

Programs 2716 and 2532 
EPROMs. Includes hardware 
and software. PET = $75.00 - 
ATARI (includes sophisticated 
machine language monitor! = 
$119.95 

EPROM BOARD FOR ATARI 

The EPROM board plug into the cartridge slots. Uses 
2716, 2532, and other EPROMs. May contain up to 8K. A 
must for making your own machine language programs. 
$19.95 

EPROMS - HIGH QUALITY, NOT JUNK 

Use with PET, APPLE, ATARI, SYM, AIM, etc. 450 ns. $6.50 
for 2716, $12.50 for 2532. We sell EPROM programmers 
for PET and ATARI - see above. 

5'/4 INCH SOFT 
SECTORED DISKETTES 

Highest quality. We use them on 
our PETs, APPLES, ATARIs, and other 
computers. 

$22.50/10 or $44.50/20 




MAE SOFTWARE DEVELOPMENT SYSTEM 
More than just an Assembler/Editor! 



A 



It's a 

Professionally 

Designed 

Software 

Development 

System 



a 






MAE 

for 

PET 

APPLE 

ATARI 

$169.95 



Blast off with the software used on the space 
shuttle project! 

• Designed to improve Programmer ProOudivity 

• Similar syntax and commands -No need to relearn peculiar 
syntaxes and commands when you go Irom PET to APPLE 
to ATARI 

• Coresident Assembler/Editor - No need to load tfie Editor men trie 
Assembler ttten ttie Editor, etc 

• Also includes Word Processor, Relocating Loader, and much 
more 

• Options: EPROM Programmer, unimplemented opcode circuitry 

• STILL NOT CONVINCED: Send lor tree spec sheeti 



MEMORY TEST 

Avoid problems with ATARI RAM cartridges. Don't let 
your guarantee run out without a test. Cassette - $6.95, 
Disk - $9.95 



3239 Linda Dr. 
Winston-Salem, N.C. 27106 
(919)924-2889 (919)748-8446 
Send for free catalog! 



V/SA' 




(MostwCard 
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GO FORTH ! 



by William Volk 



Forth is one of the most mis-understood 
computer languages. Opinions on Forth range from 
"hey, this is fantastic" to "hey, this stinks." I'm not 
going to try to explain what Forth is (and isn't) in any 
great detail here, just try to give an overview of what 
to expect from Forth. 

Technically Forth is called a threaded-interpretive 
language. This is not as complicated as it sounds. 
Lets say I want a "word" (function) that multiplies a 
number by 2. The number is 'passed' to the routine 
on the stack. The stack is a last-in, first-out list of 
numbers. All math takes place with numbers on the 
stack. This type of math is called RPN (Reverse 
Polish Notation), and is used by HP calculators. 

Back to the word 2*, a function that multiplies a 
number by 2. This word would be defined as: 

(x. . .2x) (A Diagram of the Stack 
(before . . . and after 2*) 

: 2* (start the definition) 
DUP (duplicate the number) 
+ (add the 2 numbers) 
; (end the definition) 

Forth is a compiler. Most compilers would 
convert a function directly into machine code. Forth 
places the addresses of the routines called in a 
function definition into that function definition. If 
the code for DUP existed at 4355 Hex, the number 
4355 Hex would be placed in the code for 2*. A 
"word' only takes up 2 bytes when used in a 
definition. This is why Forth programs are so 
compact. Each function called in a Forth definition 
has it's location compiled into the definition. This 
address is called a Code Field Address (CFA). In the 
case of DUP, the CFA might be the start of a machine 

language routine. If I used 2* to create a new word, 
for example 

: 4* 2* ; 
, then the CFA of 2* would be compiled into 4*. If 
we looked in memory, at this CFA, it would start a 
list of other CFA-s (DUP &. +). 

When Forth "runs" it looks at these CFA's and 
executes the routines. Eventually if one follows the 
CFA's of a function you will reach machine code, 
which is called a primitive by Forth. This path of 
CFA's taken by Forth during execution is called a 
thread, hence threaded interpretive language. 

Forth runs very fast for a high level language, 
much faster than BASIC. Claims have been made 
that Forth runs almost as fast as Assembly. The 
speed of Forth depends on many factors: the length 



of the 'thread' (# of CFA's traversed to a primitive), 
the number of operations in those primitives, and 
one of the major factors being how well written the 
program is. RPN on calculators saves key-strokes, in 
a Forth program it should save program steps (if the 
code is well designed). Most Forths include an 
assembler to allow the programmer to define his own 
primitives. This assembler is one of the best things 
about Forth, since it can be used at the same time as 
'regular' Forth. You can even use Forth words during 
the assembly process. How many assemblers would 
let you conditionally build up a trig, table during 
assembly? 

The last feature, and the most powerful, is the 
ability to control and modify the compiler. You can 
add new features to the Forth language by specifying 
what actions a "word" will do during compilation 
and/or run-time. The CASE statement of Pascal is a 
common example. My pet idea would be to add the 
List-handling capabilities of LISP to the Forth 
compiler. I have even seen BASIC written in 
FORTH. 

The Forth language gives the user two ways to 
create functions. You can type a function in directly 
or, by using an editor, create a series of functions to 
be compiled. Unlike a compiler you can test each 
function interactively (like BASIC). 

One of Forth's strange characteristics is the way 
Forth treats the disk drive. Forth looks at a disk as a 
set of virtual memory blocks. By virtual I mean that a 
disk access does not imply that your 810 will start 
running. Forth looks at a disk in terms of 128 byte 
blocks, where the block # equals the sector number 
minus one. Forth allocates a 2K buffer for these 
blocks. A block that has been read into the 2K buffer 
will not be read and/or written to disk unless room 
is needed for more blocks, or the program has 
requested a FLUSH of the disk buffers. 

Forth didn't understand the ATARI DOS file 
structure until recently. Valpar has introduced Forth 
definitions that allow Val-Forth to read and write to 
normal ATARI files! I am biased in favor of Val- 
Forth. Their documentation is worth the price of 
their software. 

The Review 

The ATARI owner is lucky to have 4 or more 
Forths to choose from. 1 own 3 of these and have 
read about others. Here is a list of their features and 
strengths/ weaknesses. 







And guess who stars as the 
movie monster. You! As any of six 
different monsters. More if you 
have the disi< version. 

You can terrorize and destroy 
four of the world's largest and 
most densely populated cities in 
over 100 possible scenarios. 
From To(<yo to the Golden Gate, 
you are the deadliest creature in 
the air, on the land, or in the sea. 

You can be the deadly am- 
phibian who simultaneously 
smashes street cars, lunches on 
helpless humans and radiates a 
ray of death. 

If you were a giant winged 
creature, think of the aerial 
attacks you could make on the 
terrified but tasty tidbits beneath 
you. 

But as in all the best monster 
movies, you're up against every- 
thing the human race can throw 
at you — even nuclear warheads 
and a strange concoction devel- 
oped by a team of mad scientists. 

For only $29.95 you get 6 stu- 
pendous monsters, each with its 
own monstrous summary card, 
4 teeming metropoli displayed in 
graphic detail on your computer 
display and mapped in the 
accompanying 48-page illustrat- 
ed book, the awesome sounds of 
monsterly mayhem, and spine- 
tingling, real-time, edge-of-your- 
seat excitement. 




GET CRUSH, CRUMBLE & CHOMP 

now 3t your local dealer for your APPLE, ATARI, 
or TRS-80 . . before if s too late. 



-0 
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APX Extended Fig-Forth:$39.95 Atari 
Program Exchange. Also from APX fun-Forth 
$22.95, and Forth Turtle Graphics Plus 
$15.95, two packages designed to work with the 
APX Forth. 

APX Forth is also available on tape. It has a small 
amount of documentation. Revision 2 seems to be 
bug-free (1 had the original). No string operations are 
provided. Floating-point math can be added 
(something the new "C" language on the ATARI 
doesn't have). It would be a great buy except for the 
following. 

Team-ATARI "Free" Forth 1.5:$00.00 = price 
of 2 disks! 

This is a public domain product that is more 
complete than APX Forth. Turtle Graphics Plus, 
from APX, should work with this Forth with a 
minimal amount of conversion. Team-ATARI's 
Forth includes Player-Missile demos and a nicer 
editor than APX. It implements strings by use of an 
additional stack — the string-stack, of course! There 
are more efficient ways of doing this. I like this 
version and the price is right. 

QS Forth, QuaUty Software $75.00 approx. 

You have to admire a company that introduces a 
technical product like Forth for a then-new and 
relatively unknown computer, the ATARI 800. They 
do let you sell software written in QS Forth (there is 
a question about APX Forth in this matter). I won't 
say anything terrible about this product, but it was 
great when it was the only kid on the block. It 
includes optional floating point words, and has been 
used in several games (BLOCK BUSTER APX). 

PNS-Forth. Mountain View Press $95.00 
(Additional $ 100.00 for license). 

This would have been my only copy of Forth, if 
Mountain View Press had not sent it pony express. 
By the time it came into Avalon Hill (where I was 
working), I had started with Val-Forth and did not 
want to have another $100.00 language around. I 
have heard many good things about PNS Forth. PNS 
Forth uses vertical-blank interrupts for many of its 
special effects. You can define a Forth primative, and 
have it run during interrupt. This is as close to multi- 
tasking as the ATARI is going to get. Player-missile 
graphics, sound, and (hopefully) scrolling can be 
implemented this way. 

PNS Forth includes player-missile graphics, 
turtle-graphics and a host of other features. It may 
have a DOS-link by the time you read this. It comes 
with over 250 pages of documentation. The license 
fee is my only complaint. 

Val-Forth, Valpar International $45.00, 
additional packages $35-45.00. 

I am totally biased in favor of this package. They 



let you sell software written in this Forth. The 
documentation is excellent. Utilities such as player- 
missile graphics make the ATARI a breeze to work 
with. 

I'm going out on a limb on this one. I predict that 
what Apple Pascal was for Apple users, Val-Forth 
will be to ATARI users. They have a link to standard 
ATARI files, character-set editor and loader, an 
extensive assembler (this is actually explained!), and 
a great implementation of string functions. There is 
much more than the above, so try to take a look at 
this package. 

I did part of Val-Graphics, their turtle graphics 
system. They completely re-wrote ATARI'S line 
drawing routines. Val-Graphics draws lines 5 times 
faster than the ATARI, and clips these lines to a user 
defined window! It even supports the Antic E mode, 
the so-called GR. 7+. I'm now using Val-Graphics to 
create the equivalent of "ATARI-World", allowing 
the user to have 3D graphics in their programs. 

Val-Forth is worth it. They answer your 
questions and many BBS's have people who use Val- 
Forth and can be of help. 

ATARI Coin-op Forth: No Price, Hard to 
obtain. 

When you first went to the computer store to look 
at the ATARI, you were probably shown a demo- 
program of moving pencils, walking school girls, and 
the most obnoxious music ever created. 

This demo was written in a Forth that has been 
around ATARI for quite a while. There are some 
"broken' copies around. Since there is no 
documentation on this and since I don't have one I'll 

say no more about it. 

ATAFORTH: Nova Technology $75.00 
(recently reduced from $125.00) 

This is a new Forth for the ATARI. This author 
first heard about this product in ATARI Special 
Additions. Since I was writing this article, I decided 
to call and find out more about this product. 

ATAForth is unique in that it loads as a binary file 
in ATARI DOS. This means that it acts exactly like 
BASIC, in regard to the disk drive. It has a function 
"CIO" which is how it talks to the operating system. 
It supports the 850 interface, and it should support 
Ram-Disk and other special purpose programs. The 
Val-Dos (Dos written in Forth) approach probably 
saves memory, however, ATAForth can be treated as 
a normal machine-language program, not a boot 
disk. I think this package will be very useful for those 
people who want to work with conventional 
assemblers and use standard I/O. 

Nautilus Systems:$300.00, $ 100.00 if you have 
this Forth on another computer. 

This Forth is implemented on every major micro- 
computer: ATARI, Apple, IBM, CPM-80, and 
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CPM-86. I'm looking into this for my commerical 
software development. How about that, — run the 
same language on a bunch of different micros! After 
doing Voyager (Avalon Hill) on six different 
computers (ATARI, Apple, TRS, TRS Color, IBM, 
and Commodore), I'd welcome any chance to 
eliminate program conversion. 



The Turtle-Graphics-Plus package from APX is 
designed to be implemented on any micro. It also 
uses the same co-ordinates for any screen resolution, 
or any part of a screen (windows). That's what I 
wrote it for. 

I hope to start a Forth column in this magazine. 
Any helpers? D 



Attach at<S^-(o9/^-4 



iFor rAr .■CZ<^S 400/600 



You have just been revived from four years of stasis. Your burst-drive irv 
terstellar transport is now orbiting the fourth planet of Epsilon Cygnus. Your 
enemy, the Tartillians, are a brutal machine race that have destroyed their 
humanoid creators and have sworn the destruction of all humanoids. Your 
mission is to destroy the Tartillians and their production facilities. It won't 
be easy as the Tartillians tight back with cleverly placed ground batteries, 



cruise ships and deadly interceptors. How will you choose to face these 
brutal enemies? Board a graviton attack ship/Uni-class and your fate is 
your own. You will have complete control of weapons, shields and the ship 
itself. Or will the mission demand the graviton attack ship/Bi-class with your 
skills as a pilot guiding the ship and controlling the shields as your gunnery 
officer fires the lyso-blast weapon, and shares your fate. 



^prs^ arca(/& action/ ofv o/ /leu^ iei/el. 



100% machine language: HI-RES graphics with sound 
One player or co-operative two player operation 

2 different missions on cassette (16K) 

3 different missions on diskette (24K) 

•Atari is a trademark of Atari, Inc. 



3 levels of difficulty 

Advanced joystick control capabilities 

Available at your local dealer 
Direct orders add $1 .50 postage and handling 
Mastercharge Visa Personal Check 
Diskette $32.95 Cassette $29.95 



© Copyright 1982 DRflffl Inc. 

18779 Kenlake Place N.E. 
Seattle, Washington 98155 

(206) 644-3425 



METEOR STORM 




MADE 

EXCLUSIVELY 
FOR THE 




24K Disk 
16KTape 



$29.95 



Ask for Meteor Storm at your local computer store or 
order direct from us. Add $2.00 for shipping. Use 
your Visa, M/C. 

METEOR STORM Is a FAST-ACTION, Arcade Quali- 
ty, game. Written in machine language especially for 
the Atari. You, as the Pilot of a Fighter space ship, 
must rescue as many people from the besieged city 
of Dracon as you possibly can. You'll have to fight 
your way through a meteor storm and aliens, with 
your lasers blasting a path. Then you must dock with 
the mother ship and safely deliver your precious 
cargo of human lives. This is your chance to be the 
HERO of Dracon. 




Dealer Inquiries Invited 

•Atari is a Trademark of Atari Inc. 



,^oi/al cSo/iwa^^ej 



2160 West 11th Ave., Eugene, Oregon 97402 
(503) 683-5361 



Experience the 

MicroProse Challenge!!! 




CHOPPER RESCUE 

Zip up your flying suit and strap yourself Into your sleel< assault chopper: 
CHOPPER RESCUE challenges your skill and daring. Pilot your nimble 
craft through the treacherous underground labyrinth. Search out and 
rescue the captives trapped inside. Danger approaches from all sides as 
defenders fire winged missiles and sparkling energy bursts at your fragile 
craft. But you are not defenseless, your explosive tipped rapid-fire 
missiles dart out to blast a path through the dense minefields. Thread 
your bomb directly into the heart of their pulsating nuclear furnace. And 
just when you think the path is clear, a swift patrol drone appears from 
behind a ledge, spitting missies as you scramble for a firing position! 
CHOPPER RESCUE features three scenarios, multiple skill levels, and 
competition in solo or team configurations for 1 to 4 players. Immerse 
yourself in the non-stop excitement of CHOPPER RESCUE. You'll keep 
coming back for more! 
Requires ATARI® 32K, Disk . . . $29.95 



HELLCAT ACE 

HELLCAT ACE is a superbly realistic re-creation of WWII Air-to-Air 
combat in the Pacific using a fullythree-dimensional airspace. HELLCAT 
ACE puts you in the fighter cockpit with its unique pilot's eye view. To 
escape and destroy the tenacious enemy fighters, HELLCAT ACE allows 
you a full range of high-performance aerobatics; including loops, stalls, 
rolls, immellman turns, and spins. The fifteen well documented scenarios 
include combat air patrol, night action, and kamikazes — and, if things 
get out of hand, you can bail out or attempt a water landing in your 
damaged fighter! HELLCAT ACE includes multiple skill levels and options 
for up to four players. Can you avoid being shot down and win five 
victories to become a HELLCAT ACE? 
Requires ATARI® 40K, Disk . . . $29.95 





FLOYD OF THE JUNGLE 

Looking for a fun game you can play with your family and friends? FLOYD 
OF THE JUNGLE is a great game up to four people can play simultane- 
ously! Can you be the first to guide Floyd through the jungle perils to save 
the lovely Janice? It isn't easy! Floyd must leap the poisonous snakes, 
climb the slippery vines, ride the elephants, and cross the raging rivers. 
FLOYD OF THE JUNGLE includes fully-animated wild animals, music, 
sound effects, and five different multi-color jungle adventures. 
Requires ATARI® 32K, Disk . . . $29.95 



MicroProse Software is dedicated to bringing you games that will challenge you far beyond the first few plays. We promise you hours 
of excitement and pleasure. Our games are created using "MicroProse", our own propriety assembly language gaming system, and 
are available at select computer stores. 



PHONE: (301) 357-4739 



For Fast Delivery by C.O.D., 
MasterCard or Visa ... Or 
Send Check or Money Order . . . 
Please add $2.50 shipping/handling. 
Maryland residents add 5% tax. 



MicroProse Software 
One Caribou Court 
Parkton, Maryland 21120 



Dealer Inquiries Welcome! 



ATARI® is a registered trademark of Atari Inc. 




A MICROCOMPUTER 
EXPERIENCE 
FOR TODAY 

Arcaders who've seen and played 
the ATARI and TRS-80 versions of 
STRATOS came to the same 
conclusions — these state-of-the-art 
games were ahead of their time. After 
all, any program that boasts crisp 
graphics, punchy sounds, joystick 
compatabllity and a full complement of 
extras, like high score saving and 
multi-player option has a definite touch 
of tomorrow. 

THE GAME'S SCENARIO IS A REAL 
KNOCKOUT 

The object is to successfully 
defend a futuristic city from waves of 
attacking alien ships. 




ATARI SCREEN SHOT 

The battle begins! Atari version features 



And these crafty alien critters are 
just part of a rapid-fire graphics 
bonanza that includes meteor swarms, 
multiple attack waves, and even a free- 
moving saucer that will repair your 
city's damaged force field on the ATARI 
version. 
GOOD NEWS 

You don't have to wait years for 
the spectacular — STRATOS is 
available now for the ATARI and TRS-80 
systems. 

STRATOS. Entertainment of the 
future — today. 




TRS-80 SCREEN SHOT 

The TRS-80 version blows you away with Its 

Arcade Action Graphics(tm)! 




Si COPYRIGHT 19B2 



dventur6 

INTERNATIONAL 



To order, see your local dealer. If he does not have the program, then call 

1-800-327-7172 (orders only please) or write for our free catalog. 

Published by ADVENTURE INTERNATIONAL 

a subsidiary of Scott Adams, Inc. 
BOX M'^h • I ONfiWOOD, FL 32750 • (:mS) 8.10-8194 




AVAILABLE NOW! 



ATARI 400/800 16K TAPE . . . 050-0161 $34.95 
ATARI 400/800 32K DISK . . . 052-0161 S34.95 

TRS-80 1GK TAPE 010-0161 S24.95 

TRS-80 32K DISK 012-0161 $24.95 



"T TO CHAtgcjE 



-John Anderson, 
Creative Computing 



-Mark Bejiioff 
A.N.A.LO.G. 



"zlhe g'lapnics display, 



nc a\e 



so. close to the oiiginal, 
tkat you mlgkt find youlself 
looking foi the coin slot 
on you>i computei. 



-Gary and Marcia Rose 
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-Leigh Goldstein, 
Electronic Gannes 



.Deiuxe 



Invaders 








VVe a%e 'belioas <^bout ,Oul Harries I 
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THE BLACK RABBIT 



48K DISK 



by Brian Moriarty 



Let's face it. Backing up disks with a single drive is 
a dull and time-consuming chore. Even with 48K, 
DOS will make you swap at least three times a copy a 
reasonably full disk of data. And then there are those 
disks DOS won't copy — boot-load software, 
FORTH screens, anything with a non-DOS file 
format. 

One day I got sick of disk-swapping and decided to 
write a more efficient backup system. I wanted to be 
able to duplicate all 720 sectors of a disk with only 
two read/write passes. To do this, I had to find a way 
to cram 360 sectors worth of data into RAM at once 
— 46,080 bytes! 

A 48K ATARI contains 49,152 bytes of 
addressable RAM, so it ought to be possible. But the 
first six pages (1536 bytes) are reserved for use by 
the operating system. And even in the ATARI'S most 
skimpy graphics mode (BASIC Mode 2), you need 
261 bytes to maintain the screen data and display list. 
That leaves just 1275 bytes for a disk-copying 
program — not enough for a useful screen handler or 
fancy options. 

The final solution was to eliminate the screen 
display altogether and use the console speaker to 
prompt the operator. This kept the program 
overhead down to less than 500 bytes. Additionally, 
I made the program self-booting so that there would 
be no need to load (and subsequently over-write) a 
DOS. 

Listing 1 is an ATARI BASIC program that cre- 
ates a boot-load version of the Rabbit on any for- 
matted disk. Listing 2 is the Assembly-language 
source code for my sector copier, called "The Black 
Rabbit" because of its speed and what it does to your 
TV screen while it's running. 

Here's a line-by-line description of the BASIC 
loader: 

Line 25. Reserves 2 pages of RAM for the Rabbit 
program and sets aside 5 extra bytes for a tiny USR 
routine. 

Lines 30-40. Set up the USR routine that will 
access the ATARI'S ROM-resident disk handler. 
This allows us to dump the Rabbit directly onto a 
disk, without going through DOS. 

Lines 50-75. Read the 64 data statements (lines 
200-263) that constitute the machine-language 
Rabbit program. Each data line contains 8 bytes of 
data plus a 9th byte that is the sum of the previous 
eight. The program adds the eight bytes together in 
the variable SUM and compares it to the value of 



CHECK (the 9th byte). If they match, the data line 
was probably typed without errors. If they don't 
match, the program will list the problem line and 
stop so that you can correct it. 

Lines 80-90. BUF$ should contain an error-free 
replica of the Rabbit program. Now we have to 
dump the contents of BUF$ onto the first 4 sectors 
of a disk so that we can boot the Rabbit. These Unes 
prompt you to insert a formatted disk and press the 
START button. REMEMBER, Rabbit doesn't 
conform to the standard ATARI DOS structure, so 
make sure the destination disk doesn't have anything 
important on it before you press START! 

Lines 95-125. Open up the disk handler and 
write the contents of BUF$ to the disk, 128 bytes at a 
time. The whole process takes less than 5 seconds. 
When you see the "DONE!" prompt, you should 
have a ready-to-boot version of the Black Rabbit on 
your disk. An error message indicates an improperly 
formatted or write-protected disk. 

The Big Moment 

Now it's time to test the Rabbit. SAVE the BASIC 
loader program on a separate disk (you can use it to 
make extra copies of the Rabbit). Then re-insert the 
Rabbit disk, turn the computer off, wait a moment, 
and turn it back on. 

If you see "Program requires 48K RAM" on the 
screen, you forgot to remove your BASIC cartridge. 
The Black Rabbit needs every byte your 48K system 
can spare, and the cartridge de-selects the top 8K of 
RAM. So pull the cartridge out and snap the cover 
shut. You should now see the Rabbit's title display: 

Black Rabbit 1.5 by Brian Moriarty 
Prompts: 8- Source M-Dest L-Done/Error 

The "Prompts" line refers to the Rabbit's built-in 
audio prompting system. It's very simple: a short (S) 
beep from the console speaker means that Rabbit 
wants you to insert the source disk (the one you are 
backing up). A medium-length beep (M) means 
insert the destination (backup) disk. A long, long 
beep (L) will sound when Rabbit has copied all 720 
sectors of your disk, or if he encounters an error. 
More on errors later. 

You heard the S-beep when the title screen 
appeared. Let's not keep the Rabbit waiting. Take 
the disk you want to copy, put it into Drive # 1 and 
press the START button. Your TV screen will go 
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black, and you'll hear the rapid beep-beep-beep of 
sectors being loaded into memory. After about 45 
seconds you'll hear the M-beep and the drive will 
stop spinning. Pull out the source disk and insert a 
nice, fresh formatted disk. Press START and wait for 
2 minutes while the Rabbit chunk-chunks 360 
sectors of data out to the new disk. 

The S-beep will tell you when Rabbit is ready to 
read the second half of your source disk. Repeat the 
procedure outlined above. At the end of the second 
write-pass, you will hear the triumphant squawk of 
the L-beep. Turn off the computer, insert a cartridge 
(if necessary) and boot your copy disk to make sure 
it's okay. 

Software Pirates Take Note 

The Black Rabbit is fast but lazy. If he can't read or 
write a sector for any reason, he will complain 
about it with a disappointed L-beep and go to sleep. 
The only way to wake him up is to kick with a re- 
boot. 

This error-handling technique has two benefits. 
First, it lets you know if your source disk is damaged, 
or if you have forgotten to format or write-enable 
your destination disk. Second, it keeps you honest 
by refusing to copy disks which have been protected 
by "bad sectoring" (like most commercially 
available software). So if you're looking for a quick 
way to pilfer a software author's profits, don't 
bother typing in The Black Rabbit! D 



BL6CK RABBIT 1.5 
BY BRIAN MORIARTY 
ANALOG MAGAZINE 



ta REM « 
15 REM « 

25 DIM BUFS tSlZJ , MLS I5J ! B=ADR tBUFS) 

30 FOR K=l TO 5: READ BVTE 

35 MLSCK,KJ=CHRSCBYTEJ IMEKT K 

40 DATA 104,32,83,228,96 

58 LIHE=2O0:FOR K=l TO 585 STEP 8 

55 5UM=8:F0R Q=0 TO 7: READ BYTE 

66 BUFS;tH+Q,K+aJ=CHR$CBYTEJ 

65 5UM=5UM+BYTE:NEXT Q:READ CHECK 

78 IF CHECKOSUM THEM ? "ERROR AT LINE 

■■;LmE:? :LIST LIME:? :EHD 
75 LINE=LIME+i:NEXT X 
88 ? "DATA READ SUCCESSFUL.":? "INSERT 

A FORMA TTED DI SK INTO DRIUE »!":? "AN 
D PRESS ■.If-lllM ." 
85 IF PEEKt53279J<>7 THEN 95 
90 GOTO 85 

95 POKE 769,l:P0KE 770,87:P0KE 779,0 
180 FOR K=B TO B-1^384 STEP 128:S = 5+1 
105 AH=INT CX/256) : AL=X- CAH«256 J 
110 POKE 772,AL:P0KE 773, AH 
115 POKE 778,S:Z=USRCADRfML$>> 
128 IF PEEK(771J<>1 THEN ? "DISK HRITE 

ERROR '" 'END 
125 NEXT X:? "RABBIT DISK OK.": END 
208 DATA 0,4,0,6,6,6,169,1,192 

281 DATA 141,248,2,165,106,281,192,288 
,1255 

282 DATA 3,76,63,6,169,36,141,68,562 

283 DATA 3,169,6,141,69,3,32,57,488 
204 DATA 7,76,33,6,88,114,111,103,538 
285 DATA 114,97,189,32,114,101,113,117 
,797 

206 DATA 105,114,101,115,32,52,56,75,6 
58 

287 DATA 32,82,65,77,46,253,155,169,87 
9 

288 DATA 0,141,198,2,141,24,208,169,88 
3 



209 DATA 

210 DATA 

211 DATA 

212 DATA 

213 DATA 

214 DATA 

215 DATA 

216 DATA 
76 

217 DATA 

218 DATA 

219 DATA 

220 DATA 

221 DATA 

222 DATA 
48 

223 DATA 
22 

224 DATA 

225 DATA 

226 DATA 

227 DATA 

228 DATA 

229 DATA 
1220 
238 DATA 

231 DATA 

232 DATA 

233 DATA 

234 DATA 

235 DATA 

236 DATA 
49 

237 DATA 
14 

238 DATA 

239 DATA 

240 DATA 

241 DATA 

242 DATA 

243 DATA 

244 DATA 

245 DATA 

246 DATA 

247 DATA 

248 DATA 
4 

249 DATA 

250 DATA 
0,1533 

251 DATA 
77,1701 

252 DATA 
64 

253 DATA 
760 

254 DATA 
97 

255 DATA 
,767 

256 DATA 

257 DATA 
76 

258 DATA 
65 

259 DATA 
53,1506 

260 DATA 
,1673 

261 DATA 

262 DATA 

263 DATA 



145,141,68,3,169,7,141,69,743 

3,32,57,7,169,0,141,47,456 

2,141,0,212,141,11,3,141,651 

4,3,169,1,141,10,3,141,472 

1,3,169,82,141,2,3,169,570 

8,141,5,3,32,83,228,32,532 

85,7,173,10,3,281,105,208,792 

243,173,11,3,201,1,208,236,10 

32,128,7,169,0,141,11,3,491 

141,4,3,169,1,141,18,3,472 

141,1,3,169,87,141,2,3,547 

169,8,141,5,3,32,83,228,669 

32,85,7,173,10,3,201,105,616 

208,243,173,11,3,201,1,208,10 

236,169,229,141,68,3,169,7,10 

141,69,3,32,57,7,169,105,583 

141,10,3,159,1,141,11,3,479 

141,1,3,169,0,141,4,3,462 

169,8,141,5,3,169,82,141,718 

2,3,32,83,228,32,85,7,472 

173,10,3,201,209,208,243,173, 

11,3,201,2,208,236,32,128,821 

7,169,105,141,10,3,169,1,605 

141,11,3,141,1,3,169,0,469 

141,4,3,169,8,141,5,3,474 

169,87,141,2,3,32,83,228,745 

32,85,7,173,18,3,201,209,720 

208,243,173,11,3,201,2,208,10 

236 , 169 , 221 , 141 , 68, 3 , 169 , 7 , 10 

141,69,3,32,57,7,76,33,418 

6,162,0,169,9,141,66,3,556 

169,88,141,72,3,169,0,141,775 

73,3,32,86,228,173,31,208,834 

201,6,208,249,96,173,3,3,939 

201,1,208,205,24,173,4,3,819 

105,128,141,4,3,173,5,3,562 

105,0,141,5,3,24,173,10,461 

3,105,1,141,10,3,173,11,447 

3,105,0,141,11,3,24,96,383 

169,226,141,68,3,169,7,141,92 

69,3,32,57,7,32,77,7,284 
96,160,194,236,225,227,235,16 

218,225,226,226,233,244,160,1 

174,181,160,32,98,121,32,66,8 

114,105,97,110,32,77,111,114, 

105,97,114,116,121,32,32,80,6 

114,111,109,112,116,115,58,32 

83,45,82,101,97,100,32,77,617 
45,87,114,185,116,101,32,76,6 

45,68,111,110,101,47,69,114,6 

114,111,114,253,155,253,253,2 

253,253,253,253,253,253,155,0 

0,0,0,0,0,0,0,0,0 
0,0,0,0,8,0,0,0,0 
0,0,0,8,0,0,0,0,0 



DtCHECK DATA (see p. 29) 

10 DATA 455,633,519,148,594,87,620,229 

,124,631,969,580,0,969,320,6798 

^0 DATA 438,465,531,824,564,41,290,486 

,389,508,11,919,937,606,187,7196 

287 DATA 421,419,336,971,939,847,899,8 

68,193,239,26,848,858,123,937,8924 

222 DATA 233,601,31,47,673,959,943,387 

,64,237.927,686,955,265,278,7278 

i37 DATA 246,838,843,87,118,284,979,11 
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eiee , 


; * 


0101 


■ » 


8182 


; » 


0103 


; * 


0184 


; « 


0105 


« 


0186 


; * 


0107 , 


« 


0108 , 


# 


0109 , 


« 



1 , 748 , 984 , 878 , 481 , 569 , 743 , 896 , 8885 
252 DATA 249,381,586,383^131^688,303^8 
,620,855,857,859,5840 



ASSEMBLY LANGUAGE LISTING 



BLACK RABBIT 1.5 

2-PASS DISK SECTOR COPIER 

REQUIRES 48K RAM 

BY BRIAN NORIARTV 
16 NORTHBRIDGE ROAD 
MENDON, MASS. 01756 

PROGRAM EQUATES 



0110 DEUNUM=S03ei 

0111 DISK0P=S0302 

0112 DSTAT=Sfl383 

0113 BUFL=Se304 

0114 BUFH=$e305 

0115 5ECTL=S030A 

0116 SECTH=$038B 

0117 RAMTOP=:SOOeA 

0118 C0M50LE=SD01F 

0119 DSKI0-SE453 

0120 TEXTI0=SE456 

0121 TEXTOP=S0342 

0122 TAI>RL = S0344 

0123 TADRH=50345 

0124 ANTIC=S022F 

0125 DHACTL=$D400 

0126 CR25=S02C6 

0127 CR2=SD018 

0128 SCRHL=S0348 

0129 SCRNH=S0349 

0130 CURSDR=Se2F0 



0131 




» 






0132 




« 


BOOTS INTO PAGES 6 AND 7 


0133 




» 






0134 








.OPT OBJ 


0135 








»=S06OO 


0136 


r 


« 






0137 


t 


K 


6 BYTES TO CONTROL BOOT-UP 


0138 


.r 


« 






0139 








.BYTE 0,4,0,6,6,6 


0140 


J 


« 






0141 


t 


K 


FIRST CHECK FOR 48K RAM 


0142 


.r 


« 






0143 








LOA ttSOl 


0144 








STA CURSOR 


0145 








LOA RAMTOP 


0146 








CMP ttSCO 


0147 








BNE SLEEP 


0148 








JMP TITLE 


0149 




« 






0150 




K 


PRINT RAM WARNING AND STOP 


0151 




# 






0152 


SLEEP 


LDA ttS24 


0153 








STA TADRL 


0154 








LDA ttS06 


0155 








STA TADRH 


0156 








JSR PRINT 


0157 


FREEZE 


JMP FREEZE 


0158 




« 






0159 




« 


THE 


WARNING MESSAGE 


0160 




K 






0161 








.BYTE "PrograM requires 


48K RAM.' 


,SFD 


,S9B 


0162 




* 






0163 




* 


DISPLAY TITLE SCREEN 


0164 




¥i 






0165 


TITLE 


LDA tt$ee 


0166 








STA CR2S 


0167 








STA CR2 


0168 








LDA »S91 


0169 








STA TADRL 


0170 








LDA tt$e7 


0171 








STA TADRH 


0172 








JSR PRINT 


0173 




» 






0174 




« 


SET 


UP TO READ SECTORS 1-360 


0175 




# 







0176 
0177 
0178 
0179 
0180 
0181 
0182 
0183 
0184 
0185 
0186 
0187 
0188 
0189 
0190 
0191 
0192 
0193 
0194 
0195 
0196 
0197 
0198 
0199 
0200 
0201 
0202 
0203 
0204 
0205 
0206 
0207 
0208 
0209 
0210 
0211 
0212 
0213 
0214 
0215 
0216 
0217 
0218 
0219 
0220 
0221 
0222 
0223 
0224 
0225 
0226 
0227 
0228 
0229 
0230 
0231 
0232 
0233 
0234 
0235 
0236 
0237 
0238 
0239 
0240 
0241 
0242 
0243 
0244 
0245 
0246 
0247 
0248 
0249 
0250 
0251 
0252 
0253 
0254 
0255 
0256 
0257 
0258 
0259 
0260 
0261 
0262 



; « 
; » 

J « 

RPl 



LDA 
STA 
STA 
STA 
STA 
LDA 
STA 
STA 
LDA 
STA 
LDA 
STA 



stsoe 

ANTIC 

DMACTL 

5ECTH 

BUFL 

tt$01 

SECTL 

DEVNUM 

»S52 

DISKOP 

tt$e8 

BUFH 



* 
* 



i * 
I * 

; « 

UPl 



READ PASS ttl 

JSR DSKIO 
JSR ADDl 
LDA SECTL 
CMP «S69 
BNE RPl 
LDA SECTH 
CMP tt$81 
BNE RPl 

PROMPT FOR DISK SWAP 

JSR MPRDMPT 

SETUP, WRITE SECTORS 1-360 

LDA ttSeo 
STA SECTH 
STA BUFL 

LDA »$ei 

STA SECTL 
STA DEUNUM 
LDA »557 
STA DISKOP 
LDA tt$08 
STA BUFH 

WRITE PASS ttl 



JSR 
JSR 
LDA 
CMP 
BNE 
LDA 
CMP 
BNE 



* 
« 



* 



DSKIO 

ADDl 

SECTL 

ttS69 

WPl 

SECTH 

tt$01 

WPl 



; « 
; » 
; * 

RP2 



* 



PROMPT FOR ANOTHER SWAP 

LDA «SE5 
STA TADRL 
LDA »S07 
STA TADRH 
JSR PRINT 

SET UP, READ SECTORS 361-720 

LDA ttS69 
STA SECTL 
LDA «S01 
STA SECTH 
STA DEUNUM 
LDA tt$00 
STA BUFL 
LDA tt$08 
STA BUFH 
LDA «S52 
STA DISKOP 

READ PASS tt2 

JSR DSKIO 

JSR ADDl 

LDA SECTL 

CMP ttSDl 

BNE RP2 

LDA SECTH 

CMP ttS02 

BNE RP2 

PROMPT FOR LAST SWAP 
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A.N. A. 


0263 






J5R WPROMPT 


8264 ; 

8265 J 


« 5ETUP, HRITE SECT0R5 361-728 


8266 


, * 






0267 






LDA ttS69 


8268 






5TA SECTL 


0269 






LDA n$ox 


8278 






5TA 5ECTH 


0271 






STA DEVNUM 


8272 






LDA tt580 


8273 






STA BUFL 


8274 






LDA tt$e8 


8275 






STA BUFH 


8276 






LDA tt$57 


8277 






STA DISKOP 


8278 


; * 






0279 


; » 


WRITE PftS5 ttZ 


0288 


; » 






8281 1 


MP2 




JSR DSKIO 


8282 






JSR ADDl 


8283 






LDA SECTL 


8284 






CMP ttSDl 


0285 






BNE WP2 


8286 






LDA SECTH 


0287 






CMP tt$82 


0288 






BNE HP2 


8289 


; * 






8290 


; « 


LONG 


BEEP FOR FINISH/ERROR 


8291 


; * 






8292 


FIHI5H 


LDA tt$DD 


8293 






STA TADRL 


8294 






LDA «S87 


8295 






STA TADRH 


0296 






JSR PRINT 


0297 






JMP FREEZE 


0298 


; « 






8299 


; » 


SUBROUTINE TO PRINT TEXT 


8308 


J » 


AND 


PRODUCE BUZZES 


8381 


; » 






8382 


PRINT 


LDK «t$ee 


0303 






LDA ttS69 


0304 






STA TEKTOP 


0385 






LDA ttS58 


8306 






STA 5CHNL 


0307 






LDA tt$ee 


8388 






STA SCRNH 


8389 






JSR TEXTIO 


8318 


; » 






0311 


; « 


MAIT 


FOR START BUTTON 


8312 


; * 






8313 


MAIT 


LDA CONSOLE 


8314 






CMP ttS86 


8315 






BNE WAIT 


8316 






RTS 


8317 


; « 






8318 


; » 


SUBROUTINE: ERROR CHECK. 
UPDATE BUFFER PBINTER AND 


8319 


; * 


8328 


; * 


INCREMENT 5ECT0R COUNT 


8321 


1 » 






8322 


ADDl 


LDA DSTAT 


0323 






CMP ttS81 


8324 






BNE FINISH 


8325 






CLC 


8326 






LDA BUFL 

ADC ttsse 


8327 






8328 






STA BUFL 


8329 






LDA BUFH 


8330 






ADC ttSBO 


8331 






STA BUFH 


0332 






CLC 


0333 






LDA SECTL 


0334 






ADC «S81 


0335 






STA SECTL 


0336 






LDA SECTH 


0337 






ADC tt$80 


0338 






STA SECTH 


8339 






CLC 


0340 






RTS 


0341 


; * 






0342 


; * 


SUBROUTINE: MEDIUM-LENGTH 


0343 


i * 


BEEP TO PROMPT WRITE PASSES 


0344 


: * 






0345 


MPROMPT 


LDA ttSE2 


8346 






STA TADRL 


8347 






LDA ttS87 


0348 






STA TADRH 


8349 






JSR PRINT 
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0350 JSR WAIT 

0351 RTS 

0352 ; » 

0353 ; * TEXT FOR TITLE SCREEN 

8354 i » 

8355 .BYTE "| 
■ by Brian Moriarty " 

8356 .BYTE "ProMpts: S-Read M 
-write L-Done/Error",SFD,S9B 

8357 ; « 

8358 ; * BUZZ BYTES 

8360 ' * .BYTE SFD, 5FD, SFD, SFD,SF 
D,SFD,SFD,SFDj,SFD,S9B 

8361 ; « 

8362 ; » ZERO-FILL END OF SECTOR 

0363 ; * 

0364 .BYTE 0,8,0,8,8,8,8,8 

8365 .BYTE 8,0,8,8,8,8,8,8 

8366 .BYTE 8,8,8,8,0,8,8,8,8 

8367 i * 

8368 .END 





„,^ ATARI 

Cfiristmas Music! 



Compare! 1. Glorious Four Part Harmony 

2. Accurate Song Reproduction 

3. Requires Only Basic Cartridge 

Volume I: Silent Night, Angels From Realms of Glory, 
We Three Kings, Go Tell It On The Mountain, 
Joy To The World, O' Gome, O' Come Immanuel, 
Good Christian Men Rejoice, Bring A Torch, Coventry 
Carol, It Came Upon A Midnight Clear. 
Volume II: The First Noel, What Child Is This, Hark 
The Herald Angels Sing, There's A Song In The Air, 
C Little Town Of Bethlehem, Angels We Have Heard, 
Away In A Manger, While Shepherds Watched, 
O Come All Ye Faithful, God Rest Ye Merry Gentle- 
men. 

Volume ill: Jingle Bells, All Through The Night, 
Please Put A Penny, We Wish You A Merry Christmas, 
O' Sanctissima, Wassailing Song, Deck The Halls, 
O Christmas Tree, Good King Wenceslas, I Saw 
Three Ships. 

Specify: Version 1 {8/24K Tape - 16/32K Disk) 
Version 2 (32K Tape • 40K Disk) 



Prices: 

Tape 
Disk ■ 



Any Single 
Volume 

$12.95 
14.95 



Any Two 
Volumes 

$21.95 
25.95 



All Three 
Volumes 



$29.95 
34.95 



Add $2.00 per volume ordered lor lyrics. 



B.I.G. Software 

533 Airport Blvd. #518 
Burlingame, Ca. 94010 
(415) 347-1063 
ATARI is a registered trademark of Atari, Inc. 
' California residents add 6V2% sales tax. 
Dealer inquiries invited. 



NOT EVERYONE CAN TEACH THEIR ATARI™ NEW TRICKS. 




WE MAKE USING AND LEARNING ABOUT COMPUTERS FUN! 



PROGRAMMING GUIDE FOR BEGINNERS OR EXPERTS - MASTER 
MEMORY MAP.™ A 32 page book with hundreds of hints on how to use 
your computer. Over 500 memory locations! $6.95. 

LEARN SOUND AND GRAPHICS with our exciting lessons called 
TRICKY TUTORIALS.™Each comes withatapeordiskfull of examples, 
and a 12 to 64 page manual written in an easy to understand manner. 
#1 DISPLAY LISTS — Put several graphics modes on your screen at 
once. #2 SCROLLING — Move text or graphics smoothly up, down, 
sideways, or diagonally. #3 PAGE FLIPPING — Change TV screens as 
quickly as flipping pages in a book. #4 BASICS OF ANIMATION — A 
beginner's lesson in animation using PLOT, PRINT, and a surprise 
game. #5 PLAYER MISSILE GRAPHICS — Learn the basics of writing 
your own arcade games. #6 SOUND & MUSIC — Simple methods to 
play complete songs, with graphics. Includes PLAYER PIANO free! #7 
DISK UTILITIES — 7 programs to help you use your disk drive. 32K. #8 
CHARACTER GRAPHICS — The best editor available with examples 
using special characters YOU CREATE and ANIMATE. #9 GTIA, 
GRAPHICS 9 to 11 — New tricks you can do with these 16 color modes. 
#10 SOUND EFFECTS — Many examples, from rainfall to laser blasts, 

NO LOCAL DEALER? CALL FOR A FREE CATALOG, OR ORDER 
DIRECT (CHARGE OR COD): 800 692-9250 OR (408) 476-4901 



with ample explanation. #11 MEMORY MAP TUTORIAL - 30 colorful 
examples of tricks your computer can do. 

TUTORIALS cost only $19.95 each, except 5 and 7 which cost $29.95 
each. 16KTape/24K Disk required. 

SPECIAL: Tutorials 1 through 6 in a binder for $99.95. SAVE $30.00! 

USER SUBMITTED PROGRAMS 

We sell many fine programs written by dedicated computer owners, 
such as INSTEDIT, SPACE GAMES, MINI WORDPROCESSOR, DATA- 
BASE DIALER, PHOTO'S ADVENTURES, and many more. 

OUR GUARANTEE: Your money back if unsatisfied! 

FROM DEALERS 
WORLDWIDE. 



Educational 
Software inc. 



SOQUEL, CA 



OUR GAMES ARE WORLDS 
APART FROM THE ORDINARY. 




Games for the Apple and Atari computers. 



Gamesters everywhere are discovering tlie 
many worlds of Broderbund's Apple and Atari 
programs, and they're not going back to anything 
less. Because Broderbund's entertainment soft- 
ware offers pleasures and perils found nowhere 
else in the galaxy. 

Only B rod er bund can take you on a 
desperate rescue mission aboard CHOPLIFTER, 
then give you a fast lesson in train robbing with 
TRACK ATTACK. Next, try battling the metamor- 
phic maze and slithery monsters found only in 



SERPENTINE and LABYRINTH. Or enjoy the live- 
ly pinball action of DA VID'S MIDNIGHT h/IAGIC. 
Trouble shooters will find plenty of targets with 
STAR BLAZER, while DUELING DIGITS will put 
your mind and reflexes to their ultimate test. 

So next time you're looking for new worlds 
to conquer, remember Broderbund. You'll find 
the experience most extraordinary. 



Call or write for our free catalog. 



^ Bftiderbund Softiuare 

Broderbund products are available at your retailer or by writing to: 
Broderbund Software, Inc., 1938 Fourth Street, San Rafael, CA 94901, Tel: (415) 456-6424 

Apple II is a registered trademark of Apple Computer, Inc. Atari is a registered trademark of Atari, Inc. 
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FORTH- DOS 



DISK 16K 



by William Volk 



Why do I like FORTH? I like it because it is the 
only compiled language for the ATARI that creates 
compact, fast-running programs. I use it because 
unlike traditional compilers it can be used in an 
interactive manner (like BASIC). Currently I am 
programming in Val-FORTH, which includes 
excellent functions for player-missile graphics. 1 
have written a turtle-graphics package for the ATARI 
Program Exchange, and did part of Valpar's Turtle 
Graphics. 

FORTH's Faults 

FORTH does not use the ATARI Disk Operating 
System. FORTH knows nothing about file-structure 
or directories. You can't edit FORTH with Text- 
Wizard or the ATARI Editor. Also it is hard (but not 
impossible, see Diety) to send FORTH over the 
phone. 

I use my word processor to do all my editing, for 
BASIC, LISP, and ASSEMBLY. I had to learn a new 
editor in order to use FORTH. 

FORTH's files are arranged in "screens", which 
are physical sectors that are read in sequence. You 
edit 1 screen at a time, 1 or ViK of memory. This is 
especially frustrating for large programs. However, I 
find the FORTH editor just fine for small programs. 

Also, if you intend to write application programs 
(database, communication, or word processing) in 
FORTH, you will have to provide a link to the 
standard ATARI file structure (for example, a 
Visi-Calc interface for a Database program). 

FORTH doesn't use the ATARI file structure for 
some valid reasons. DOS takes up memory and 
many applications don't require its presence, games 
for example. Some people have written DOS links in 
FORTH, but this negates FORTH's compact nature. 
If you're not going to be using the DOS in your 
application, why include DOS in it? 

A BASIC Program for FORTH? 

Strange as it seems, I found the solution to this 
problem by writing a BASIC program. Now I can use 
any ATARI file editor for FORTH programs. I can 
also take information stored on FORTH screens, 
and convert "it to normal ATARI text files. 

FORTH-DOS is a program that will load a text 
file into memory, format the file for FORTH, and 
save it on specified screens. It also accomplishes the 
reverse process, allowing me to use the FORTH 
editor, to make corrections on those screens, and 



then transform them back into a text file. 
FORTH Screen Syntax 

FORTH code has several features that impose 
some kind of formatting requirements on FORTH- 
DOS. FORTH definitions must have spaces between 
functions (words). Also, you don't want a word split 
between two lines. FORTH-DOS "cleans-up" the 
text file, formatting if for the FORTH screen. 

The reverse process is simpler, but I did want to 
eliminate trailing spaces, in the text file. 

There are two formats for FORTH screens. APX 
FORTH uses IK screens (16 lines of 64 characters), 
Val-FORTH uses ViK screens (16 lines of 32 
characters). FORTH-DOS takes this into account 
when processing the text files. In the FORTH screen 
to text file process, FORTH-DOS starts with the 
appropriate line length (32 or 64 characters), and 
attempts to eliminate trailing blanks. 

The Program 

LINES 10-20 Dimensions the strings. E$ is used 
as the buffer and is filled with blanks. The machine 
code for reading/writing sectors is poked into 
memory. 

LINES 50-150 Gets the text file's name, the 
FORTH screen # to start with, and asks the user 
what type of FORTH they are using. Determines if 
this is a FORTH to DOS transfer, or vice-versa. 

LINES 200-250 The FORTH to DOS transfer, 
reads the sectors into E$ (the buffer). 

LINES 280-400 Creates the text file B$. Lines 330 
&. 340 attempt to eliminate trailing blanks from C$, 
the current line in the screen. 

LINES 500-590 The DOS to FORTH transfer 
reads lines of text from the file B$. Line 550 adds 
trailing blanks, if C$ (the line of text) is shorter than 
the FORTH screen line size. Lines 560 to 580 start at 
the FORTH screen line size, in C$, and tries to find a 
space to end the line (unless the next line starts with a 
space). This prevents splitting a word between 2 
lines. The number of FORTH screen lines processed 
is stored in COUNT. Note the recursive feature of 
line 590. C$ is set to the remainder of C$ and the 
entire process is repeated. 

LINES 600-670 The FORTH screens are saved on 
the FORTH disk. 

LINES 4000-4080 The subroutine to read/ write 
sectors into memory. The read/write operation is 
stored in OPR. 
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CONCLUSION 

There you have it. No more complaints about the 
difficulty about working in FORTH? Well it should 
help you write larger programs in FORTH. D 

Suggestions for the use of FORTH-DOS 

FORTH-DOS attempts to format the text files as 
best as it can, but there are still things to watch out 
for. 

Don't let comments extend past the maximum line 
length of your FORTH. FORTH will interpet this as 
an error. 

You should look at the screens before trying a 
'LOAD'. You may want to insert a '— ' at the end of 
the screen. 

If your FORTH supports a "LOADS" function, 
use it. 

The FORTH to DOS transform will result in 
correctly set-up screens every time, since this 
transform doesn't split up lines. 



18 DIH B$C2e] .A$C7) :BUF=(FRECe)-10ee} : 
DIM E$CBUF),C9{12e) 

15 ESCBUFJ=" ■':EStl,lJ= ESC2J=ESC13 

28 POKE 1664,184:P0KE 16e5,32:P0KE 168 

6, 83: POKE 1666,83: POKE 1667, 228 : POKE 1 

668,96 

58 ? "THIS PROGRAH TRANSFERS FORTH" 

68 ? "IMTO TEKT FILES, AND UI5A-UER5A" 

79 ? "USE TEXT FILES TO EDIT FORTH!" 

75 ? "NAHE OF TEKT FILE";: INPUT BS 

88 ? "HHAT IS THE FORMAT OF YOUR" 

98 ? "FORTH, D-IK SCREEN 64 CHAR. LINE" 

95 ? "0-1/2K SCREEN 32 CHAR. LIHE":INP 

UT A$:IF AS<>"1" and AS<>"2" THEN 88 

188 ? "START SCREEN"; : INPUT START 

118 SIZE=8:LINE=64:IF AS="2" THEN SIZE 

=4:LINE=32 

128 ? "1-FORTH TO DOS, 2-DOS TO FORTH" 

; : INPUT A$ 

138 IF AS="1" then 288 

148 IF flS="2" THEN 588 

158 GOTO 128 

288 REM FORTH TO TEKT FILE 

205 ? "INSERT DISK IN DRIVE tt 1, TO RE 

AD SCREENS" 

218 ? "t» OF SCREENS"; : INPUT SCRS:IF SC 

R5#5IZE»128>BUF THEN 218 

228 SECT0H=1+STAHT»SIZE : AMHT=SCR5«SIZE 

:BUFFER=ADR(E$] 

238 0PR=82:F0R 1=1 TO AMMT:GOSUB 4888 

248 SECT0R=SECT0R+1 : BUFFER=BUFFER+128 

258 NEKT I 

288 ? "CREATING TEKT FILE -";BS:? "INS 

ERT DISK T8 HRITE TO, HIT RETURN ":INP 

UT AS 

298 CLOSE ttl:OPEN ni,8,8,B$ 

388 FOR M=l TO tSCRS«SIZEW128) /LINE 

318 C$=E$ tK«LINE- CLINE-1) , K«LINE) 

328 A=LENCCS) 

338 IF A THEN IF CS(A,A)=" " THEN A=A- 

l:GOTO 338 

348 IF A THEN ? ttl;C$ CI, A} :GOTO 358 

345 ? ttl 

358 NEKT K 

488 CLOSE ttl: END 

588 REM TEKT TO FORTH 

518 ? "INSERT TEKT-FILE DISK, HIT RETU 

RN": INPUT A$ 

515 OPEN ttl, 4, 8,8$ 

538 C0UNT=8:TRAP 680 

548 INPUT ttl,C$ 

545 A=LEN(C$) :K=:COUNT%LINE+l:IF A=8 TH 

EN COUNT=COUNT+l:GOTO 548 

558 IF A<=LINE THEN ES tK,X+A-l)=G$ :COU 

NT=C0UNT41:60T0 548 



568 A=LINE:IF CS CA+1, A+1J=" " THEN 598 

578 IF A THEN IF CSCA,AJ<>" " THEN A=A 

-l:GeTO 578 

588 IF A=8 THEN A=LINE:REM CANT FIND B 

LANK 

598 ES <K , K+A-IJ -CS CI , AJ : CS=CS CA+1) : COU 

NT=CBUNT+l:GOTO 545 

688 CLOSE ttl:SCR5=C0UMT/16:IF INTCSCRS 

lOSCRS THEN SCR5=IHT C5CRS) +1 

618 ? "INSERT DISK IN DRIUE ttl":? "TO 

HRITE ";SCR5;" SCREENS":? "HIT RETURN" 

; : INPUT A$ 

628 AMMT=SCRS«SIZE : BUFFER=ADR CES) : SECT 

0R=1+START»SIZE 

638 0PR=87:F0R 1=1 TO AMMT:GOSUB 4886 

648 5ECT0R=SECT0R+1 : BUFFER=BUFFER+128 

658 NEKT I 

678 END 

4888 BUFHI=INTCBUFFER/256> 

4818 BUFL0=BUFFER-BUFHI«256 

4828 POKE 772, BUFLO: POKE 773,BUFHI 

4838 POKE 769,1 :POKE 778, OPR 

4848 SECHI=INTCSECT0R/256) 

4858 5ECL0=SECT0R-5ECHI»256 

4868 POKE 778, SECLO: POKE 779,SECHI 

4878 RESULT=USRCie64] 

4888 RETURN 



DtCHECK DATA (see p. 29) 

18 DATA 396,75,594,748,937,990,515,498 

,349,48,617,165,196,435,733,7288 

158 DATA 496,488,476,28,754,845,58,745 

,513,376,629,286,721,849,243,7587 

345 DATA 166,446,247,114,876,49,647,23 

,561,238,283,966,616,41,917,6182 

618 DATA 832,479,175,238,409,57,425,78 

2,492,782,681,621,551,821,793,8138 




The First and Only System to 
Backup Diskettes Protected 
By Bad Sectoring. 



ATARI DISK BACKUP 
SYSTEM 




INTRODUCTORY PRICE 

95 



$49. 



OTHERS MAKE CLAIMS.. 

SUPERCLONE MAKES 

COPIES!!! 



Superclone is the on/y ATARI diskette copier 
system that lets you backup just about ANY 'copy 
protected' diskette. . .including those protected 
by 'bad sectoring.' Bad tracks and sectors are 
created without modifications to your hardware. 
Each backup diskette generated by Superclone 
functions exactly like the original. . .self-booting, 
etc. (In fact, we suggest that you use the backup 
and save the original.) 
Superclone includes: 

SCAN ANALYSIS - map of diskette contents 

(location of data, bad sectors, etc.) 
FORMATTING/BAD SECTORING - 

Non-ATARI DOS formatting and bad track/ 
sector creation. 
BACKUP - copies just about everything we can 
find. . .regardless of protection scheme. 
Superclone Is user-friendly and simple to use. (Pirates take note: Superclone only 
allows two copies to be made of any specific diskette. . .Sorry!!!) Requires 32K, 
Available at your computer store or direct from FRONTRUNNER. 
Include $2.00 Shipping for each system. 
DEALER INQUIRES ENCOURAGED 

ATARI SOFTWARE EXCHANGE 

We are gathering public domain Software to be exchanged among users. 
Programs are distributed for only a trivial handling charge. Categories include: 
Games, Education, Home, Business, Utilities, Special Languages, etc. Han- 
dling charges waived for program contributors. Please send programs on tape 
or disk only. For latest listing send $1.00 and SASE. 

TOLL FREE ORDER LINE: 

1-800-648-4780 

In Nevada or for questions 
Call (702) 825-4300 

For fast delivery, send certified or 
cashiers checks, or money orders. 
Personal checks allow 2 to 3 weeks 
to clear. M/C and VISA accepted. 
Be sure to include shifiping. (Nevada 
residents add tax) 




100 W. Grove, Suite #115 
Reno, Nevada 89509 

(702)825-4300- 



ATARI is a Trademark of ATARI, Inc. 
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CALENDAR GENERATOR 



CASSETTE OR DISK 16K 



by Michael Duboy 



Do you need some help remembering dates? This 
program can not only do that, but more importantly, 
it will create a graphic display of any month in a wide 
range of years. The user should have no trouble 
writing any kind of remark he may choose, with 120 
spaces reserved for messages. The final format for 
messages is up to the user, but examples have been 
included with the program. 

I originally designed this program with the coming 
years in mind, but added the backward regression for 
the historically minded user. The assembly 
subroutines work with a one byte value, which is the 
difference between a known year (1980) and the 
input year. 

There is an exception to a leap year being a year 
exactly divisible by 4, which in centenary years is 
not exactly divisible by 400, as 1900. If the user 
wishes to extend the range of the program these ex- 
ceptions must be entered into the program to main- 
tain accuracy. 

The user will note a minor graphic problem due to 
the use of GRAPHICS 1. This is caused by the fact 
that GRAPHICS 1 has only 20 pixels across the 
screen, which can't be divided by 7 evenly. The least 
confusing and distracting solution, with color, was to 
combine several of the double digit numbers. 

Variable Table 
YEAR holds input year R =ABS(R1) 

R 1 signed result of LY = 1 indicates a leap y r. 

YEAR- 1980=0 nonleap year 
I temporary variable U used in reading data 

DAY transfers values, final value used to 

position CAL$ 
CAL$ string that holds the calendar's numbers 

MONTH$ holds the name of the month 

USR Functions Disassembled 

The three USR functions are presented in dis- 
assembled form, with the 1st commented on in 
detail. The first column represents the address in 
hexadecimal; the object code is Poked into these 
locations. The second column is the object code in 
hex. Note that some instructions are more than one 
byte long. Object code is always written as a double 
digit number; even is written 00. Grouping hex 
numbers in pairs (adding zero to fill out a single digit) 
makes it easy to tell the number of bytes needed and 
prevents single digit code from being mistaken as a 
double digit object code. The Op Code (mnemonic) 
is in the third column. The Operand (if any ) is in the 



fourth column. A $ in front of a number indicates a 
hex address while #$ indicates a hex number. I found 
THE ATARI ASSEMBLER by Don Inman and Kurt 
Inman very helpful since I'm new at programming in 
machine language. 



0100 
B110 


;MKKlClCKKMl(KKK10(lCX)(KMKKKMKJ(XmC)<)tK 

;» COLEHDAR GENERATOR/REMINOER » 


0120 
8130 
0140 


;» USR FUNCTION ttl » 


«= S0605 




8150 


PLfl 




;PULL BYTE FROM STACK 


0160 


1 




CNDT USED) 


0178 


PLft 




;PULL BYTE FROM STACK 


0180 


> 




(NOT USED) 


0150 


PLA 




;PULL BYTE FROM STACK: 


0200 


J 




VALUE OF UARIABLE "R" 


0210 


SEC 




;SET CARRY FLAG CFIRST 


0220 


f 




STEP IN SUBTRACTION) 


0230 


SBC 


ttS04 


;SUBTRACT 4 FROM IT 


0240 


BE« 


50621 


; BRANCH IF EOUAL 


0250 


CMP 


«501 


; COMPARE TO 1 


0260 


BEO 


S0619 


; BRANCH IF EQUAL 


8270 


CWP 


ttS02 


;COMPARE TO 2 


0280 


BEO 


S0619 


; BRANCH IF EQUAL 


0290 


CMP 


ttSB3 


; COMPARE TO 3 


0300 


BNE 


50608 


; BRANCH IF NOT EQUAL 


0310 


LDfl 


tt500 


;LOAD ACCUM. WITH ZERO 


0320 


STfl 


50601 


; STORE UALUE IN ACCUM. 


0330 


3 




AT ADDRESS 50601 


0340 


J MP 


50626 


JJUMP TO 50626 


0350 


f 




tUNCONDITIONAL) 


0360 


LDA 


«501 


;LOAD ACCUM. WITH 1 


0370 


STfl 


50601 


; STORE AT ADDRESS 5601 


0380 


RTS 




; RETURN TO BASIC 


0390 


BRK 




; PLACE BETWEEN USR 


0400 


t 




FUNCTIONS 



The 2nd USR and 3rd USR serve the same 
purpose to count from the given year to the input 
year, taking into account the leap years. USR(2) 
counts backward and USR(3) forward from 1980. 
The word SAME is entered in the following 
disassembly where object codes in USR(3) are 
exactly the same as in USR(2). 

I would like to offer the following advice: CSAVE 
the program before running it. A small mistake in 
entering the decimal equivalents of object code (lines 
50-300) can cause your computer to "lock-up". The 
only cure is to shut off the power. 

A common mistake is entering a period for a 
comma in DATA statements, so when entering data 
for the USR functions use extra caution. 

8110 ;* CALENDAR GENERATOR/REMINDER * 

0120 ;* USR FUNCTION «2 « 

0138 J^M- MM K MKKM -H^M MMKM MMMM KK Hefr MMKMMKK 

0140 »= 50628 

8150 PLA 

0160 LOX «503 

0178 LDY «500 

0180 JMP 50632 



INTRODUCING 




THE I TALK 11 

SPEECH 
SYNTHESIZER 

By RealTime Electronics 



Thinking of upgrading 
your Atari® System with a 
speech synthesizer? 

Heard one "horror story' 
too many? 

Well, now you can get 
your Atari® talking with 
the speech synthesizer 
designed specifically for 
Atari® 400 and 800 
computers. 
Onlike Others. 

The I TALK IF" was 
engineered with hardware 
that won't limit the 
versatility of your Atari®. 
Comes Complete. 

With the 1 TALK \r you 
won't be required to make 
additional purchases. 

Such as an interface module. 

Or extra cable. 

Or an external speaker. 

And you won't need an external 
power supply. 
Easy Installation. 

Because the 1 TALK W™ was designed 
specifically for the Atari® 400 and 800 
computers, installation is fast and simple. 
Less than one minute. 
Program Simplicity. 

The I TALK W boasts four voices and an 
unlimited vocabulary. With the 1 TALK IF" it's 
no chore to incorporate with your own 
programs. Your synthesizer 

comes with complete CjREEN'BRI'Ef'R 

easy instructions. ^^*"^*^^^^^ l^K.ml.fc^l.m. 

MARKETING INTERNATIONAL, INC. 

509 So. 48th St., Suite 105, Tempe, AZ 85281 
Telex 165025 CECPHX — 602/966-0511 



Each I TALK IF" comes 
complete with a diskette or 
cassette featuring — 

• Machine Language Driver- 
allows I TALK W" to 
speak without inter- 
rupting your basic 
program or graphics 
routines - occupies 
approximately one page 
of memory. 

• Word Editor - Create your 
own words. 

• Sentence Builder. 

• Dictionary - Store words 
for later use (dictionary 
and sentence builder not 
available on cassette). 
Bonus Features. 

• Educational Game: Word Blaster. 

• Arcade-Style Game: Coming soon. 
Follow-up software will be constantly 
available. Only 1 6K required for any game 
utility above. 
And your I TALK IF" comes with a 

1 2 Month Limited Warranty. 
Need one more reason to order now? 
Well, the 1 TALK IF" is now available for a 
limited time only at the special introductory 
price of $ 199 . That's $59.°-° off our regular 
retail price. 

So, write or phone today: Greenbrier 
Marketing International, Inc., 509 So. 48th St., 
Suite 105, Tempe, AZ 85281 

602/966-0511. 

When ordering please 
indicate disk or cassette. 



VISA 



VISA® and MASTERCARD® orders accepted. QQ 



Price subject to change without notice. Atari"" is a registered trademark of Warner Communications. 
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0198 
0200 
0210 
0220 
0230 
0240 
0250 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 



0100 
0110 
0120 
0130 
0140 
0150 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 
0248 
0250 
0260 
0270 
0280 
0290 
8388 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 



LDK 
CPY 
BEQ 
LDA 
CMP 
BEO 
DEC 
INY 
DEH 
CPX 
BEQ 
J MP 
5TH 
RT5 
DEX 
LDY 
CPX 
BEO 
JMP 
BRK 



ttS07 

$0604 

$064E 

n$eo 

$0603 
$064A 
$0603 



tt$00 
$0630 
$0632 
$0602 



tt$O0 

»$eo 

$0630 
$0632 



;» CALENDAR GENERATOR/REMINDER » 
;» USR FUNCTION »3 * 
J MKKKKKMKKXKKKKMKKKMMICKMKXKWKMKK 

»= $0659 

PLfl 

LDX «$03 

LDY tt$03 

JMP $0663 

LDX »$01 

CPY $0604 

BEQ $067F 

LDA »$00 

CMP $0603 

BEQ $0678 

DEC $0603 

INY 

INX 

CPK tt$e8 

BEQ $0661 

JMP $0663 

5TX $0602 

RT5 

INX 

LDY tt$0O 

CPX «$08 

BEQ $0661 

JMP $0663 

BRK 



The comparison of USR(2) and USR(3) strongly 
indicates the possibiUty of combining the two 
together. Why not give it a try? BASIC can POKE the 
values needed by LDX, LDY, and CPX into safe 
locations in page 6. Direct addressing can be used 
instead of immediate allowing the USR function 
access to the data. The JMP's use the same entry 
point. The address varies because of differing 
locations of the two USR functions. The only real 
difference is the use of DEX in USR(2) vs the use of 
INX in USR(3). 

Program Comments by Line Number 
2-6 determines number of days in month to 

be displayed 
11-40 adjusts DAY to 1st day of input month 

45 directs program to lines that will 

graphically display the calendar 
50-291 decimal equivalent of USR functions 

300 enters USR functions into page 6 of 

RAM 
350-405 title display and request for input data; 

the unusual character in line 402 is 

made with the ECS key plus the CTRL 



key and the 2 key 
410-430 executes USR functions 
500 gives BASIC data obtained by USR 

functions 
510 directs program to subroutines 

550-600 creates final graphic representation 
610-695 personal reminders are entered here. 

Lines 610-615 used for Jan.. . .etc. D 



REM CALENDAR GENERATOR by Michael Du 
boy 

1 DIM M0NTH$f9),CAL$C90) IGOTO 300 

2 CALS=" 123456789 10 1 

I 12 13 1415 16 17 18 19 20 2122 23 24 
25 26 27 2829 38 31" 

3 IF M0NTH=4 OR MDNTH=6 OR M0NTH=9 OR 
MONTH-11 THEN CAL$=CAL$ CI, 855 

4 IF LV=1 AND M0NTH=2 THEN CAL$=CAL$(1 
,82J :RETURN 

5 IF M0NTH=2 THEN CAL$=CAL$ (1, 80) 

6 RETURN 

II HONTH$="JANUARY": RETURN 

12 DAY=DAY+3:M0HTH$=" FEBRUARY" : RETURN 

13 DAY=DAYtA:MONTH$=" 

14 DAY=DAY+B:MONTHS=" 

15 DAY=DAY+C:MOHTH$=" 

16 DAY=DAY+D:MONTH$=" 

17 DAY=DAY+E:MONTH$=" 

18 DAY=DAY+F:MONTH$=" 

19 DAY=DAY+6 : M0NTH$="5EPTEMBER" : RETURN 

20 DAV=DAY+H:MONTHS=" OCTOBER" : RETURN 

21 DAY=DAY+J:MONTH$="NOUEMBER": RETURN 

22 DAY=DAY+K : MONTHS="DECEMBER" : RETURN 

29 REM «* DETERMINES 1ST DAY OF MONTH 
** 

30 A=3:B=6:C=l:D=:4:E=B:F-2:G=5:HrO:JrA 
:K=G 

32 IF LY=1 THEN A=4 : B=0 : C=2 : D=5 : E=B : F= 

3:G=6:H=l: J=A:K=G 

35 ON MONTH GOSUB 11,12,13,14,15,16,17 

,18,19,20.21,22 

40 IF DAY>7 THEN DAY=DAY-7 

45 GOTO 550 

50 REM ** 1ST USR FUNCTION »* 

51 REM *» 34 BYTE5+1 BRK #» 

60 DATA 104,104,104,56,233,4,240,20 

70 DATA 201,1,240,8,201,2,240,4,201 

80 DATA 3,208,239,169,0,141 

90 DATA 1,6,76,38,6,169,1,141,1,6,96,0 

100 REM *« 2ND USR FUNCTION ** 

110 REM »* 48 BVTES+1 BRK «* 

120 DATA 104,162,3,160,0 

130 DATA 76,50,6,162,7,204,4,6 

140 DATA 240,23,169,0,205,3,6,240,12 

150 DATA 206,3,6,200,202,224,0.240 

160 DATA 233,76,50,6,142,2,6,96,202 

170 DATA 160,0,224,0,240,219,76,50,6,0 

180 REM «« 3RD USR FUNCTION »« 

190 REM ** 48 BYTES *» 

200 DATA 104,162,3,160,3 



MARCH": RETURN 

APRIL":RETUHN 

MAY" ."RETURN 

JUNE" .-RETURN 

JULY":RETURN 

AUGU5T":RETURN 



210 DATA 76,99,6,162,1 

220 DATA 204,4,6,240,23,169,0 

230 DATA 205,3,6,240,12 

248 DATA 206,3,6,280,232,224,8 

250 DATA 240,233,76,99,6 

260 DATA 142,2,6,96,232,160,0 

270 DATA 224,8,240,219,76,99,5 

290 REM Wt USR FUNCTIONS STORED ** 

291 REM «* AT PAGE 5 ** 
300 FOR 1=1541 TO 1672:READ U:POKE I,U 
INEXT I 

350 GRAPHICS 1; POSITION 0,8:? tt6;" CAL 

ENDAR JUaiaHuOE and 

REMINDER" 

360 ? tt6:? «6;"|l!]jaPH3iB: 1901-2099" 

390 ? "P lease u se a nuMber for the Hon 

th.":? "liM^ajy: 1.1980" 

400 ? "What Month and year"; :INPUT HON 

TH,YEAR 

402 IF YEAR>2099 OR YEAR<1901 THEN POS 

ITION 4,19:? tt6;"0UT OF RANGE!":? "B" : 

GOTO 400 



405 Bl=YEflR-198e:R=flBS(Rl) :POKE 1540,4 

{POKE 1539 R 

410 U1=U5RC1541,HJ :REM DETERMINES IF L 

EAP YEOR 

415 IF R1>=0 THEM 430 

420 U2=U5RC1576J .REM FOR MEGflTiyE UOLU 

E Rl 

425 GOTO 500 

430 U3=USRC16Z5J :REM FOR POSITIVE UflLU 

E 1 

500 LY=PEEKtl537} :DflY=PEEKC1538J :REM » 

»15T DAY OF THE YEflR^^* 

510 GOTO 30 

550 GRAPHICS 1:P05ITI0H 3,2:? tt6;M0HTH 

5 1 11 ■■ ■ YEAR 

560 ?'tt6:? «6;"sun h t w thu f s"; 

570 G05UB 2 

580 I=CDAY-1J«3: POSITION 1,7:? tt6;CflL5 

:? «6 

600 OM MONTH GOTO 610,620,630,640,650, 

660,670,680,690,700,710,720 

609 REM ** SPECIAL DATES »» 

610 ? tt^i-mnsiKnsiamssi" 

619 GOTO 390 

620 ? tt6j"t 

629 GOTO 390 

630 ? »6;'l 

639 GOTO 390 

640 ? tt6;' 

649 GOTO 390 

650 ? «6J"^ 

659 GOTO 390 

660 ? «6j"|L 

669 GOTO 390 

670 ? tt6j"CinTTTTJ=<:i>3=(:M<iT;'B- 

679 GOTO 390 

680 ? tt6 ; "9 

689 GOTO 390 

690 ? tt6j' 

699 GOTO 390 

700 ? tt6j' 

709 GOTO 390 

710 ? «6;"i__ 

719 GOTO 390 

720 ? «6;"f 
729 GOTO 39e 

see END 



D:CHECK DATA (see p. 29) 

DATA 660,254,924,680,576,78,501,23,3 

38,123,19,948,938,945,169,717 6 

19 DATA 550,252,386,311,204,358,873,15 

7,470,470,770,272,702,675,83,6533 

90 DATA 202,26,319,765,541,769,907,970 

,230,798,332,897,497,237,652,8142 

240 DATA 496,647,202,442,457,577,685,6 

29,877,871,973,803,249,988,778,9674 

428 DATA 574,508,531,559,535,336,873,5 

57,160,191,511,686,816,374,817,8028 

630 DATA 538,742,152,819,202,820,155,8 

21,418,548,253,550,175,552,351,7096 

709 DATA 535,461,537,484,820,297,3134 



i2LINC0LN'S BIRTHDAY 



17 ST. PATRICK'S DAY 



EASTER 3RD SUN. 



MOTHER'S DAY 2ND SUN 



FATHER'S DAY 3RD SU 



25 NEPHEH-5 BIRTHDAY 



LABOR DAY 1ST HON 



COLUHBUS DAY 2ND HON 



THANKSGIVING 4TH THU 




-•o 



PUTER STORE 



SOFTWARE GALLERY® 

P O BOX 3354. CHERRY HILL. N.J. 08034 

(609) 424-7106 



ATARI ATARI ATARI 



32K RAM BOARD $72.95 

INTEC RAM BOARD FOR ATARI 400/800 

We are the only software and 
computer store you'll ever need 

BESTSELLERS 

Centipede 33.95 Nautilus 25.95 

Choplifter 24.95 Threshold 31.95 

Preppie 23.95 Clowns & B 24.95 

Shamus 25.95 

Chicken 25.95 

Pac Man 32.95 

Canyon Climber .24.95 



Pacific Co 23.95 

Protector 25.95 

Crossfire 26.95 

Visicalc 184.95 



WE CARRY A FULL LINE OF ATARI PRODUCTS 
AT DISCOUNT PRICES 
CALL FOR CATALOG AND PRICES. 

PHONE ORDERS CALL (609) 424-7106 FOR 
IMMEDIATE COD, SHIPMENT 



VISA' 



CHARGE IT WITH YOUR VISA 
OR MASTER CARD 

Add 3% for Master Card and Visa 

I^THANK YOU FOR YOUR ORDER! 



PROTECT 

YOUR COMPUTER 




^-^ 



special Oa99 

COMPUTER COVER 

Features heavy duty canvas with vinyl interior-waterproof. 

ATARI-800/AC-8 =8.99 EPSON/ MX-80 =8.99 

ATARI-400/AC-4 'S.99 EPSON/ IVIX-80FT =8.99 

ATARt-8W/AD-D =8.99 IBIVI PC PRINTER =8.99 

0KIDATA/IJ82A =8.99 



Mail Order 
SOFTWARE GALLERY 



P.O. Box 3354 

Cherry Hill, IM.J. 08034 

Call: (609) 424-7106 



Add S2 for postage and handling 
N.J. residents add 5% sales tax. 



Dealer & Distributor 



^TRAV-LER==" 

INC. 

359 Wales Ave. 

New York, N.Y. 10454 

Call: (212) 993-7100 

NOTE: Atari. Epson. IBM and Okidala are registered trademarks. 



ADD A FLOPPY DISK TO YOUR ATARI 
FOR LESS THAN $450 



Now Atari* users can upgrade to 5" or 8" floppy 
disks at an affordable price with MICRO MAIN- 
FRAME. 

Micro Mainframe, the premier manufacturer of low 
cost add on peripherals for the TRS-80 computer, 
is proud to announce our lineup of products for the 
Atari* computer. Micro Mainframe is not a new- 



comer to the computer marl<etplace, as we have 
been supplying quality disl< drives for the TRS-80* 
for three years. We now bring our expertise to the 
Atari* marl<et and pledge to provide the highest 
quality peripherals at the lowest price. 

Our floppy disk drive is designed to sell for under 
$450, and check out the features: 



Low initial cost includes one disk drive and controller 

Single and Double Density operation STANDARD 

Additional drives available for under $200 

Controller features a proprietary digital phase lock loop data separator for unparalleled reliability 
' Operates 8" disk drives with our MaxiDos A operating system (AVAILABLE MID-1983) 
-> Intermix 5" and 8" disk drives with MaxiDos A 

• Includes a parallel printer port to allow the use of low cost printers 

• Expandable to include hard disk operation (requires expansion chassis and host adapter) 
< Includes a SWITCHING POWER SUPPLY that is capable of running two disk drives 

' Can be used in conjunction with other Micro Mainframe peripherals 



The expensive Atari* 810 disk drive includes a 
costly disk controller and power supply for each 
drive. This is wasteful as one controller can easily 
control up to four disk drives. With a MICRO 
MAINFRAME drive, you pay only once for the disk 
controller. To add a second disk drive, you merely 
purchase a disk drive and case. The power supply 
in your first drive will power an additional disk 
drive. Other manufacturers use cheap linear 
power supplies which generate considerable heat 
that can shorten the life of your electronic equip- 
ment. 



ADD A DISK DRIVE TO YOUR 
ATARI* FOR LESS THAN $90 

If you already own a TRS-80 Model-Ill*, you can 
use your Model-Ill* as an intelligent disk controller 
with the addition of our CONNECTION A™. This 
peripheral connects between the 50 pin expansion 
bus on the Model-Ill* computer and the Atari* 400 
or 800 computer. After loading the supplied soft- 
ware package, your Model-Ill* computer thinks 
that it is an Atari* disk drive and you can read and 
write Atari* diskettes on your Model-Ill* for less 
than $90. 



Dealer Inquiries are Solicited 

MICRO MAINFRAME 

11325 Sunrise Gold Circle 

Building E 

Rancho Cordova, CA 95670 

(916) 635-3997 
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BURP! 



DISK 16K 



by Charles Bachand 



(Who else would write a computer program called 
"Burp"? Ed.) 

Over the years, we have all run across diskettes 
that just would not format. This was probably due to 
a scratch or dent on the disk surface, and even 
though the ATARI 810 disk drive returns the 
addresses of bad sectors to the computer (Huh, 1 
didn't know that!), the disk operating system makes 
no use of them. Well, how would you like to be able 
to use those disks that up until now you have been 
feeding to the trash? 

BURP (Basic Unuseable-disk Reclaimer 
Program), is a machine language program that 
patches itself into DOS's disk formatting routine. 
Being an AUTORUN.SYS file, it is loaded when the 
computer is first powered on and is essentially 
transparent to the user. The only programming 
limitation is that no other program can reside within 
the address space $600 - $694. 

There are a couple of limitations involved in using 
BURP: 

1 ) The program will still return a bad sector error 
and abort if any bad sector is in the space taken up by 
the disk directory (sectors 360-368) or the disk 
boot (sectors 1-4). 

2) Do not save DOS out to a disk after BURP has 
run without also saving a copy of the 
AUTORUN.SYS file containing BURP to the same 
disk. The DOS will have been patched into BURP, 
and without BURP itself loaded into memory any 
attempt to format a disk will end with DOS dying a 
terrible death! (In other words, it bytes the dust.) 

BURP is divided into three sections. The first is a 
group of patches that load into the existing DOS. 
These patches wedge BURP into the Disk Operating 
System, and reduce the error retry count to allow the 
OS to say "1 give up!" a lot sooner. 

Next follows the main section of the program that 
converts the bad sector numbers returned by the 810 
disk drive into the corresponding bits of the disk 
directory's Volume Table Of Contents (VTOC). 
The VTOC has a bit for every sector on the disk. If a 
bit is on (1), this tells DOS that it may store data in 
that sector; no other file is currently using it. It also 
follows that if the bit is off (0), the sector is currently 
in use and should not be touched. 

We next compare these bits with those of a freshly 
formatted disk. If the bit is on then BURP will shut it 
off to mark it as being in use. However, if it was in use 



to begin with, then we are in trouble and BURP will 
produce a bad sector error abort. 

The last part of the program will check the number 
of sector errors on the disk. If there were no errors 
encountered, the program merely writes the first 
directory sector. Otherwise, we build a fake file entry 
with the name "Bad Sectors" and a length of the 
number of bad sectors. This entry is used as a flag to 
identify which of your disks caused problems. 

The completely documented Macro Assembler 
listing follows, as well as a BASIC program to 
generate BURR D 



108 REM ++* BURP ++* 

118 HEM B05IC UNU5EftBLE-DI5K 

120 REM RECLAIMER PROGRAM 

138 REM 

148 OPEN ttl,8,0,"D!AUT0RUH.SV5" 

150 TRAP 158 

160 READ A: PUT ttl,A:GOTO 140 

178 CLOSE ttl:END 

200 DATA 255,255,140,7,141,7,169,9 

218 DATA 76,13,78,13,76,82,13,142 

220 DATA 13,144,13,32,0,6,165,13 

230 DATA 169,13,208,248,32,181,6,8 

240 DATA 6,144,6,169,0,141,148,6 

258 DATA 141,147,6,172,147,6,177,71 

266 DATA 141,145,6,280,177,71,141,146 

270 DATA 6,288,281,255,208,8,205,145 

286 DATA 6,208,3,76,149,16,140,147 

298 DATA 6,169,0,160,3,78,146,6 

306 DATA 110,145,6,106,136,208,246,42 

318 DATA 42,42,42,168,169,8,56,186 

326 DATA 136,16,252,178,173,145,6,185 

338 DATA 10,168,138,49,69,288,5,184 

346 DATA 184,76,181,18,138,81,69,145 

350 DATA 69,168,3,177,69,56,233,1 

366 DATA 145,69,238,148,6,76,8,6 

378 DATA 172,148,6,248,21,162,18,189 

386 DATA 134,6,9,128,157,6,28,282 

396 DATA 16,245,169,96,141,1,28,148 

486 DATA 2,28,32,113,16,76,25,18 

410 DATA 96,66,97,108,32,83,181,99 

426 DATA 116,111,114,115,224,2,225,2 

436 DATA 133,6 



ASSEMBLY LANGUAGE LISTING 
i BURP - Bad Disk Reclainep Pro-am 

; Urjtten by Charles Bachand 



This ppogram patches itself into 
ATARI'S DOS 2.8S to allow for the 
formatting of physically danaged 
and previously unuseable diskettes 



Note: 



This program will not allow 
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VTC 
BAD 
URTDIR 

mnc 

DELDOS 
ERD6AD 
DIR 



the formatting of a disk 
uith danaged disk boot sectors, 
or damaged directory sectors. 
Sorry. 



System Equates 

$45 

$47 

$1871 

$1895 

$1219 

$12B5 

$1461 



idirectory's VTOC pointer 

;bad sectw buffer pointer 

jwrite directory sector 

;write volume table of contents 

;set no DOS 

jnwflial bad disk sector exit 

;fi1e directory buffer 



Patches to DOS 2.8S 

0R6 $878C 

LDA M ;no retry m errws 

0R6 $e04C 

JMP $«D52 jbypass bad sector errors 



ORG 
JSR 

ORG 

BNE 
JSR 



$8D8E 
BOS 



spatch new error handler 



$8M5 

$809F ;do all but first sector 

WRT08 jMrite first directwy sector 



Routine to mark bad sectors as being 
in use on the disk's ^OC. Patched into 
the DOS at address $6D%. 



ORG 



$8^88 ;ue had to put it soneplace! 



;Yes. rotate a left 4 
;tiffles, so that it Mill 
;have data in lou bits 
;and look like 88888XXX 
;use value as counter 
iZero accumulator 
;set carry flag 
BS3 RGR A irotate carry throu^ Ace 
{decrement counter 
;At Y'th position? No. 
;Yes. save bit mask in X 
;get byte number 
;add offset to sector map 
;use as VTOC index 
;get bit mask back 
I^DwithinOC 
;Bad sector in use? No. 
;YES! Ue are in trouble! 
;pull return stack ackft'ess 
;and report error condition 
BS4 TXA ;get bit mask again 

{invert allocation bit 
jand store it back in VTOC 
jpoint to free sectors 
jbyte in VTOC 
jset carry for subtract 
{decrement number by one 
;save it out again 
{increment bad sector count 
{lo(^ back and do It again. 
If no bad sector errors, then just write 
out the first directory sector to disk. 
If there are errors, we will put a file 
entry into the directory telling how many 
sectors are bad and then write it to disk. 



ROL 


A 


ROL 


A 


ROL 


A 


ROL 


A 


TAY 




LDA 


«8 


SEC 




RGR 


A 


DEY 




BPL 


BS3 


TAX 




LDA 


B94IJH 


ADC 


«ie 


TAY 




TXA 




AND 


(VTOjY 


BNE 


BS4 


PLA 




PLA 




JHP 


ERDfiAD 


TXA 




EOR 


(VTC),Y 


STA 


(VTC),Y 


LDY 


113 


LDA 


(VTC),Y 


SEC 




SBC 


«1 


STA 


(VTC),Y 


INC 


BADCNT 


JHP 


BD5LP 



BD5 LDA 


«8 ; 


initialize 


STA 


BADCNT { 


bad sector counter 


STA 


BOSPT ; 


and bad sector index 


BD5LP LDY 


BDSPT 


load index 


LDA 


(BAD),Y ■ 


get bad sector (low) 


STA 


BSNUH , 


store it for later 


INY 




increment pointer 


LDA 


(BM)>,Y 


get bad sector (high) 


STA 


BSNUMtl 


store it too 


INY 




increment pointer again 


CHP 


#$FF 


end of data? 


BNE 


BDCOKF 


No. not yet 


CMP 


BSNUM ; 


is low byte $FF? 


BNE 


BOCflKT 


No. not at end yet. 


JMP 


WRVTC 


Yes. Write VTOC 


BDCDNT STY 


BOSPT 


save index 


IDA 


«e 


Zero accumulator 


LDY 


113 


shift sector nimber 


BSI LSR 


BSNUM+1 


3 bits to the right 


ROR 


BSNUM 


through high and low bytes 


ROR 


A 


rem goes in A as XXX8(e88 


OEY 




decrement count 


BNE 


BSI 


{Done 3 times? No. 



URTD8 


LDY 


BADCNT 


get bad sector count 




BEQ 


NGERRS 


Bad sectors? NO. 




LDX 


ffl8 


Yes. File nme to entry 


MGUFN 


LDA 


BADFN,X 


frcmBADFN 




ORA 


l$8B 


inverse video, UOU! 




STA 


DIR*5,X 


to directory twffer area 




DEX 




decrement counter 




BPL 


HGVFN 


Done 11 bytes? No. 




LDA 


«$^8 


mark file as locked 




STA 


DIR 


and in use 




STY 


DIRtl 


store bad sector count 


NOERRS 


JSR 


WRTDIR 


,write sector to disk 




JMP 


DELDOS 


;mark disk with no DOS 



RETURN RTS {return after patching 

BADFN DB 'Bad S' {file name used to mark 

06 'ectors'^{the disk as damaged. 

BSNUM DS 2 {bad sector number 

BDSPT DS 1 {bad sector pointer 

BADCNT DS 1 {bad sector count 

END RETIWN {Just return after loading 
(continued on next page) 
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To generate the BURP progran and 
have it saved to a file, run the BURP 
Haker prograH written in BASIC. The 
object prograH will be stored on file 
D:AUT0RUN.SY5 Which Will autoMatical ly 
load the progran after DOS is loaded. 

If you want the option of using BURP 
or not using it, sinplv change the file 
naMe specified in the opening stateHent 
to soMething other than D:aUT0RUN.sy5. 
To run BURP now, it will be necessary 
to call up the DOS Henu and perforM a 
binary load froH your chosen new file. 




ATARI 820 
PRINTER 



RIBBONS'RIBBONS 

Purple-Black'Red-Green 

$5.00 EACH + $1 S&H 

ESD, R O. BOX 952 
Cleveland, OH 44120 





"^ "^BIG MATH 
ATTACK™ 

Challenging new math program . . . 

Sharpen your skills by entering the correct answer 

before the equation lands' on your city! Provides 

hours of educational entertainment "^ PQU/" 

Features: 

• Full color 

• High resolution graphics 

• Animation 

• Sound 

• Four math functions (+, ■, X, ^) 
» Two levels for each function 

Recommended for grades 1 -6. Available for the ATARI & APPLE l\. 

ATARI 16K (cass.) $20.00 

ATARI 24K (disk) $25.00 

Requires ATARI BASIC cartridge 

APPLE I! (disk) DOS 3.2/3.3 $25.00 

Requires Applesoft Basic in ROM. 

Ask for it at your local computer store. 





or order direct 



^.H.E.S.I.S. 

P.O. Box 147 
Garden City, .Ml 48135 
(313) 595-4722 



Please add; 

SI. 50 shipping/handling 

$1.50 CO.D. 
WRITE FOR FREE CATALOG 
DEALER IMQUIRIES WELCOME 



We ARE Atari!® 

New Jersey's Largest Retailer of Atari 

Programs for 400/800 Models.Over 

Programs Available from More 

Than 60 Manufacturers. Send 
or Stop by for Our 

Latest Catalog 




Only $2.00 (includes postage and handling) 
Fully Refundable as a $2.00 credit 
with your first purchase! 
Mail check or money order 
payable to Software Asylum to 
Software Asylum Catalog 
626 Roosevelt Avenue 
Carteret, N.J. 07008 
ATARI' is a ^ 32K 

registered 
trademark of 
lATARI, INC. 



"PLAY BALL" 

for Atari® 
by Cartho Games™ 
True-to-life Baseball based on Actual 
Statistics, so realistic you can even get rained out! 
Manage, call the plays, bunt, steal, pinch-hit. 
Comes complete with team data and score sheets. 

ONLY Exclusively from 



$19.95 

+5% taxNJ residents 



-^.^ 



We now RENT computer games 
ask for details! 



Software ftjSVLUn. Inc. 

(201)969-1900 



t 



Krell's College Board 

SAT* 

Preparation Series 

NEW FOR 83 



=\ 



A COMPREHENSIVE PREPARATION 
PACKAGE / MORE THAN 40 PROGRAMS / $299.95 

1. Diagnostic analysis 

2. Prsscrlpllon of individual study plans 

3. Coveragt of all SAT* skills 

4. Unlimited drill and practice 

5. SAT* Exam Question simulator 

6. All questions in SAT* lormat and 
at SAT* difficulty level 

7. Instantaneous answers, explanations 
and scoring lor problems 

8. Worksheet generation and perlormance 
monitoring - (optionall 

9. A complete record management system - 
(optional) 

10. Systematic Instruction in pertinent math, 
verbal and lest taking skills - (opllonai| 
Krell's unique logical design provides 
personalized instruction lor each stuilent 
according to individual needs. 



Shelby ^^ 
Lyman i^ 
Chess ^' 

Shelby's Socrates Chess Tutorial Series uses the latest 
Al techniques to customize each lesson lor you. 
Construction modules cover every aspect ot the game. 
For all micro's. Call or write lor details. 

Amazing Ben 

The Royal Road to 

Artificial Intelligence. 

$79.95 

Connections 

A complete game system. Learn the 
principles of scientific reasoning in your 
choice of game formats. Expand minds 
al all ages. Subject areas include: 
Geography, Biology, Everyday Objects, 
etc. 

Game System $99.95 

Data Base, $24.95 per subject, 
3 for $50 

Isaac Newton + F.G. Newton 

Perhaps the most lascinallng and valuable educational 
game iver devised - ISAAC NEWTON challenges Ihe 
players to assemble evidence and discern Ihe underlying 
"Laws of Nature". FULL GRAPHICS NEWTON - 
presents all data in graphic lorm. This game is suitable 
lor children. Flayers may select dilficulty levels 
challenging to the most skilled adults. 

Bath Games $49.95 



ALSO AVAILABLE 

Time Traviier / Odyssey in Time 

Competency Proficiency Series 

Pythagoras and Ihe Qragon 

Balticslli / Micro Deulsch 

Super Star Baseball / Sword of Zsdek 

War at the Samurai 
CALL FOR DETAILS AND PRICES 



\ 



KREU: 

SOFTWARE CORR 

•32D 5M»r arao* AomI / Slony BnxM NY ) 1 790 
r«l«ohon« Sie 7SI Silt 

Kicll Soll<i*4<c Coio n^s no qIIiciji wts ■'III ir>e Coiieie 

Entiance Liitnintiion Btuta w ine EdiiCJCKinii Immf Service 

Hi«il <\ towncf \ ^pcMt«« ot ixoouds lo irw t J_S 

■■■■ N 1 s 'PiiCj.it^ Mtd ^*i« lu r^Mii 

■■■■■ PriCBsSliqhtlYHighirOulsida U.S. ' ^^ ' 



J 



l>|l|;M4ii:i.mil>lifiMti;Mii!H:H.iiJfWrtJ'l;i .Mi,|.»|jJ i .ICT i 

361 IF V=K6 THEM H=Kll+Kie+K14^X fK6) :M= 
80+MCK5) 



NOREM (PG. 52) ; 



148 FOR ME=1 TO LI-3:IF LIS CME, ME+3J=" 
REH " THEN LOS=LI$ CI, HE-2> : POP :GOTO 1 
80 

228 IF LISC7,9)="REM" THEN 118 



\-^^ 



x\^' 





1^ 





MAGIC MAIL* 



An Lwcilinii New l)iU;i Biisc Mailing ami Personal Information System Ibryour Atari 400/8tK)** 
Personal Computer. Ne\er betbre ha\e al! these lealures been designed into a single Mailing and 
Information S>stem. so eas\ lo use and so powerful. 

COMPARE THESE FEATURES: 



Diiui tielils: Name. .Address. Cily. Stale. Zip Code. 

.-Xrea Code. Phone Number. Birttiday (m/d/y). 
and Entry Type. 

I'p 10 il)27 records per I3iskelle! 

Less ihan 1 second Search Time over 45% ol'your Data, and 2-4 seconds over the 
other 5"ri.*** 

Up to 62 SF^P.ARATi; and UNIQUE Hies permilled per Diskette. 

Single or IDouble IDisk Drive Capability. 

Built in SORT, capable of Sorting ANY Data l-iie by ANY Field with up to 10 Sub- 

rields. 

Command-Driven with simple English-like commands; FIND. MODIFY. 

PRINT. ADD. SORT. etc. 

Position Independent & Position Dependent Fields. 

Files compatible wiili Atari DOS It.** 

Recorded on High-Quality Verbatim Diskettes. 

Every Diskette Pre-tesled lor Bad Sectors and recording integrity. 

Versions lor: Epson MX-8(I. Prowriter. Centronics 

Print Single-width Mailing Labels or Directi ly Listing. 

100% Machine Language. 

16 K Minimum Memory. 
60-Page User Manual. 

90 Day Buyer Prolection Ciuaranlee. 

Call or wrile for FREE additional information. 



'MAGIC MAIL is a Trademark of A-BIT-BETTER Software 
•*ATAR1 is a Registered Trademark of Atari Inc. 
***Search time is for an Indexed File. 



aSBS 

A-Blt-Belter SoftwareJ^ 

Post Office Box 28 
Laurel Md 20707 



(301) 953-7256 
Dealer Inquiries Invited. 




aur^ft' 






cti' 



vlS^ 



^^ 



#' 



.s-t 



t^^' 



GHOST ENCOUNTERS 

A 16K ikssembly Language Real-Time 
JLdventure Game For AEAJU® 400/800™ Computer 



w^Ti 


wfp^r ■' ^ ''( 


ir 


W^^lj^m 




HEW'S ■ 


'.^. 


HiH '' 


'"-(^ 


ma^ 





> *- 




GHOST ENCOUNTERS™ is the second 
in a series of real-time, jo3rstick con- 
trolled, adventure games foUowiing 
ACTION QUEST,™ presenting a brand 
new collection of dangers and puzzles. 
ITou, as a gliost, travel througli a net- 
work of 30 rooms in search of valualile 
prizes while, at the same time, try to 
sxirvive the many perils encountered. 
Of course, a mere ghost cannot over- 
come all the evil powers striving to 
hlock his journey. Luckily, you are not 
a mere ghost, hut are equipped with 
the power of transmutation, allowing 
you to take on the form of other, some- 
times more useful, objects. Who knows 
when a torch or a hammer might he 
just what the witch doctor ordered. 

Locating all 30 rooms and the 20 prizes 
scattered throughout req:uires a player 
with fast response, phsrsical coordina- 
tion, and intellectual resourcefulness. 
Of the 20 prizes, no two can he acquired 

Atari ■ and 400/800"' are trademarks of AIAiil, Inc. 



through exactly identical methods. 
Regardless of which factors most inter- 
est you in a real-time action game, you 
are sure to find them among the wide 
variety of challenges located in GHOST 
ENCOUNTERS™ 

Availalile from sroiir local Atari retailer or 
send $29.98 in check or money order 
CCalifomia residents add 6Vs% sales tax) 
to JV Software Inc. 



ALSO AVAILABLE 

Don^ forget to ask for the original ACTION' 
Q1TE8T;" with its own unique and imagina- 
tive assortment of puzzles, prizes, and 
perplexing predicaments. Another chal- 
lenging Journey through an entirely 
different network of rooms and prizes. 

Also available in 16K for $29.98 £romyour 
local retailer or JV Software Inc. 



J V SOFTWARE, irsiC 

3090 MARK AVE. SANTA CLARA, CA 95051 
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With this tool you can write letters, documents, 
articles, or poems. After positioning the tape and 
powering on the ATARI, type: RUN "C:" and hit 
return. You will then be instructed on what to do 
next. When ready, you will see a blank screen except 
for some numbers down the left side. These numbers 
are known as markers and appear in black on white, 
or inverse video. The use of markers will be 
explained later but for now suffice it to say that they 
can be typed by hitting the ATARI key, a number, the 
ATARI key, and a space. 

The first thing to realize is that your document size 
can be up to 4080 letters long, of which 24 lines of 
40 letters can be viewed at any one time. You can 
control where you are in the document by using the 
Joystick in PLYR 1. First, place the cursor where you 
would like to type, then type. The document will 
scroll up or down when the cursor is pushed to the 
bottom or top of the screen. When you hit the top or 
bottom of the document space the ATARI makes a 
"clipping" sound. There are also several ways you 
can make changes or correct mistakes. With some 
mistakes you can move the cursor and retype. More 
likely, however, you will need to insert space or 
delete something as well. To permit this. Letter 
Writer can be placed in one of three modes by 
pushing the OPTION button. The blue (typing) 
mode, the green (insert) mode, or the pink (delete) 
mode may be selected. When in green or pink mode 
type any key to insert or delete spaces at the cursor. 

There is one more area to discuss. If you wish to 
save, load, or list a document the START button 
must be pressed. A menu of four choices will appear. 
Choice #4 will return you to the top of your 
document (in blue mode). For the other choices, you 
are asked for a start marker number, an ending 
marker number, and a device. Things will usually run 
smoothly if you hit return when asked for marker 
numbers, since default markers are already there as 
previously mentioned. You may place markers 
anywhere you wish, and this is how a block 
move/ copy is done. But you should be careful to 
keep markers outside of the document. A list of valid 
devices: C, E, P, D:filename. After a valid device is 
entered, the portion of the document between the 
start &. ending markers will be saved or listed. The 
saved document includes the ending marker but not 
the start marker. For the load choice (#2), the 
loading text overwrites the present document after 
the start marker. 



Final notes: This is not a word processor. Even 
though the end product is a printed document, it is 
up to you to insert the carriage returns (seen as an_) 
and other printer control characters into the text. 
The ESC key and other editor keys all print rather 
than edit. Typing CAPS or ATARI keys must be 
followed by typing another key. The BREAK key 
will disable the letter writer until SYSTEM RESET 
and RUN is typed, but you must remember to 
remove the frozen cursor left in the document. There 
is no way that you can lose your document until 
powering down. D 

PROGRAM DESCRIPTION 

The letter writer is a 2 stage BASIC program with 
a few small Assembly language functions called via 
USR. The first stage works within the space 0K'4K 
and its purpose is to place machine code in page 6 of 
memory and to allocate and inirialize the space from 
4K-8K for the document. To allocate space the low 
memory pointers are pushed up to 8K and the 
second stage is run. This takes advantage of the fact 
that ATARI BASIC code is completely relocatable, 
working off its page pointers. There is no 
contention for the space between OS RAM and 8K 
as there would be for high memory (where the OS 
places its display list). The second stage begins by 
initializing its constant variables and opening the 
keyboard device. A second initialization 
immediately follows to place the document on the 
screen and home the cursor. Line 20 is the main 
loop. Each form of input is checked in turn for 
activity. Details of this follow. The Assembly listing 
is documented with its BASIC code counterpart. 
Assembly language executes faster (insert & delete 
would be intolerably slow in BASIC) and improves 
the readability of the BASIC code with USR. 



Variables used (stage 1) 

J index to store machine code 

A$ current DATA in buffer 

DOC document's absolute location 

ASSCR ascii to screen function 

Input ascii-hex ("0" to "9", "A" to "F") 
G output integer-hex (0 to 15) 

HIGH upper 4 bits of machine code 

byte 
LOW lower 4 bits 
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Code by lines (stage 1) 

10000 initialize read pointer and 

variables 

10010-10070 Loop: read DATA buffer, 

convert it, and store 12 
machine bytes per iteration 

10080-10110 initialize the document with 

markers. This serves 2 pur- 
poses: 1 ) it enables you to 
notice a blank document 
scrolling. 2 ) it provides default 
markers 

10120 push up low memory pointers 

and run next stage 

10200-10210 Subroutine to convert ascci- 

hex to integer-hex 

Constants and Variables (stage 2) 

RIGHT, LEFT, UP, 

DOWN cursor movement subroutines 

SAV, LOD, LST save, load and listing 
subroutines 



TOGGLE, ASSCR 


» 


SCR AS, DELETE, 




INSERT 


Assembly language subroutines 


DOC 


document's absolute location 


DEV$ 


device (for saving, loading. 




listing) 


DL 


address of load memory scan 




word in display list 


OLD 


Graphics contents at DL 


CURSOR 


current offset of cursor in 




document (0-4079) 


XCUR, YCUR 


current x,y coordinates of 




cursor on screen 


WINDOW 


current line number of first 




line on the screen 


MODE 


current mode (typing, insert, 




or delete) 


JOY 


last reading of joystick 


CH 


deleted choice (1,2,3,4) 


KEY 


last reading of keyboard (or 




loading) 


MARKS 


current start marker number 


MARKF 


current ending marker number 


START 


absolute address of start 




marker's location or start of 




search for marker 


FINISH 


absolute address of ending 




marker's location 


S,I 


temporary variables 



Code by lines (stage 2) 



1,5000 



10 
20 



Traps all errors. Necessary because dis- 
play list must be restored in order to 
view the error. 

full initialization done when RUN 
main loop. Each GOSUB checks for a 
form of input. 



30 
50 
70 

90 



100 
110 

120 



130 
140-155 



160-175 
180-185 



200 
210 
215, 255 



260 



300 
310 
315 

320-330 

340 

350 

360 

400 

410 

420 

430-450 

460 

500-550 

1000 



cursor moves RIGHT. If at right boun- 
dary, it wraps around to start of line, 
cursor moves LEFT. If a left boundary, it 
wraps around to end of line, 
cursor moves UR If at top of screen, 
screen will scroll down. 
If at top of document, no scrolling &. 
click is made. 

cursor moves DOWN. If at bottom of 
screen, screen will scroll up. 
If at bottom of document, no scrolling 
&L click is made. 
Keyboard input routine 
Location 764 will have a value other 
than 255 if a key was pressed. 
Get that Key (ascii). note: if ATARI or 
CAPS key was hit, program waits here 
until another key is pressed. 
3 way branch for 3 modes 
mode 0: CR key must be altered so it will 
not waste document space by doing an 
actual carriage return. 13 was chosen 
because that is a CR for a printer. Place 
character in document and move cursor 
forward. 

mode 1: Insert one space before the 
character under the cursor, 
mode 2: wipe out character under the 
cursor. In modes 1 & 2 the document's 
contents move 1 space at cursor position 
on. 

Joystick input subroutine. 
Value of 15 means no input. 
To move cursor, turn if off then turn it 
on. Diagonal motion allowed. 
No other inputs processed while joystick 
moves. This avoids unpredictable 
results if keyboard and joystick are done 
at once. 

START button input subroutine. 
Value of 6 is START 
Cursor turned off, so it won't be frozen 
into document. 
Get responses 

choice 4 only exit to document 
Choices 1,2,3 
stay with menu 

OPTION button input subroutine 
Value of 3 is OPTION 
cycle to next mode 
Set color of mode 

Delay is for control. No other inputs 
processed until mode is selected. 
Search for marker routine. Very slow. 
Inputs: S, START. Output: I. 
2nd initialization. Display list memory 
pointer set to document. Home cursor. 
Put in typing mode. 
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1500-1560 Choices 1,2,3 have 3 prompts. Checks 
made: marks in range 0-9; ending 
start+1, both in document; device can be 
opened 

2000 First initialization. Sets constants and 

open keyboard. 

2100 Saves document between start & 

ending markers (incl. ending marker) 

2200 Loads document from device and over- 

lays space following start marker. 
Stops in any of 3 cases: ending marker 
found in device; end of space reached; 
EOF on device reached. 

2300 List document between start & ending 

markers exclusive. 



^ ?l" "^^^T^" WRITER Stage I by ft. Katz 

2 REM If using DOS OP other co-residen 
t software wust adjust DOC to 
^.5?*? f'igher 4K increHent. Lines leoee 
,10128, and 1st digit of 32980 

4 REM Hust be adjusted. 

5 REM Lines 18115, and 10128 wust be c 
hanged i f stage li is o n disk. 

dm 



SftME STCIGE i THFM STftGE 2. 



BSEBiiE 



10080 RESTORE 32080 : J=0 : DIM fi$C24):D0C 

=4096 : ftS5CR=1557 : Cl=l 

18010 REftD 05: FOR I=C1 TO 23 STEP 2 

10828 IF ftS«:i.I3="K" THEN 10888 

18038 Hzft5C«iS(I,IJJ:G0SUB ie208:HIGH= 

G 

10040 H=ftSCCftS«I+Cl,I+Cl)} :GOSUB 10288 
:L0W=G 

18850 POKE 1536+J,HIGH»16+L0M:J=J+C1 

10860 NEMT I 

10078 GOTO 18818 

18888 POKE D0C,USRCftS5CR,flSCC"EI"3) 

18098 FOR 1=480 TO 4096 STEP 400 

18180 POKE D0C+I,U5RCfl55CR,ftSCC"Q"J> 

10118 NEXT I 

18115 ? "HIT l;l^<ll:ri ON BEEP" 

10120 POKE 743,e:P0KE 744,33:P0KE 128, 

0:POKE 129.33:RUN "C : " 

18288 IF H>=ftSCC"ft") THEM G=H-ftSCt"ft"3 

"^18 i RETURN 

10218 G=H-ftSCC"8") :RETURN 

32080 DATA 186868186D888685D56885D4 

32818 DATO 080881044980910460686868 

32828 DATA 85D4A98885D5A5D42968C98e 

32830 DATA D0e8A5D418694085D468A5D4 

32848 DATA 296eC960D08168A5D438E928 

32058 DATA 8SD46868686885D4A9e08SD5 

32060 DATA A5D42960C948D8e8A5D438E9 

32878 DATA 408504680504296809680001 

32880 DATA 68A50418692B85D468686818 

32898 DATA 60e88685D56885D4A00e8ei8 

32180 DATA 69ie85D6A801BlD48891D4C8 

32118 DATA E604DeF6EeD505D5C50eD8EE 

32128 DATA 686868186D0OO685D56885D4 

32130 DATA A0eee61869188507A9008506 

32148 DATA A888A5D6D802C6D7C6DeBlD6 

32150 DATA C8910688A5D6C50408e7A507 

32168 DATA C5D5D0ei68189eE2X 

D:CHECK DATA (see p. 29) 

1 DATA 288,432,315,438,603,548,141,132 
,883,589,389,586,939,956,734,7805 
18898 DATA 848,787,926,191,329,896,378 
,174,174,182,243,159,211,259,183,5932 
32088 DATA 162,178,193,449,192,206,314 
,378,488,2472 



1 TRAP 5000 

2 REM Letter Writer Stage II by O . Kat 
Z 1982 

10 GOSUB 28ee:G0SUB 1000 

28 GOSUB 200:G0SUB 380:G0SUB 400:G0SUB 

108:G0T0 28 
38 CUBS0R=CUR50R+l:KCUR=HCUR+l:IF KCUR 
=40 THEM KCUR=e:CURS8R=CURS0R-48 
32 RETURN 

50 CURSOR=CURSOR-l:KCUR=KCUR-l:IF KCUR 
=-1 THEM KCUR=39:CMRS0R=CURS0R+4B 
52 RETURN 

78 CURS0R=CURS0R-40 : VCUR=YCUR-1 : IF VCU 
RO-1 THEN RETURN 

72 YCUR=e:MINDOH=MINDOU-l:IF NIND0M=-1 
THEN MINDOM=e:CURSOR=CURSOR440:POKE 5 
3279 7:RETURN 

74 POKE DL+l,IMT((MIN»aMK4e+DOC)/256] : 
POKE DL , MIN00MK40 + D0C-PEEK tOL*lJ«256 
76 RETURN 

90 CURS0R=CURSDR+40 : YCUR=YCUR+1 : IF YCU 
R<>24 THEN RETURN 

92 YCUR=23:WIN00H=MIN00M+l:IF UIN00H=7 
9 THEN MIMDOM=78:CURSOR=CURSOR-40:POKE 

53279 7:RETURM 
94 POKE 6L+l,IMT(CHIND0t«(484D0C)/256] : 
POKE OL , HIND0t<H(40+D0C-PEEK C0L + 13«256 
96 RETURN 

100 REM KEYBOARD INPUT 

110 KEY=PEEKC764J :IF KEV=255 THEN RETU 
RN 

120 GET ttl.KEY 
130 ON MODE GOTO 160,180 
140 IF KEV=155 THEN KEV=13 
145 POKE CURS0R4D0C,USRCASSCR,KEY} 
150 GOSUB RIGHT :IF KCUR=6 THeHi GOSUB D 
OMN 

155 KX=USR(TOGGLE, CURSOR} :RETURN 
160 XK=USRCTOGGLE, CURSOR) 
165 KEY=ASCC" ")+128 
170 KH=U5RCIHSERT,CURS8R) 
175 POKE CURSOR+DOC,USRtASSCR,KEYJ :RET 
URN 

180 XX=USRtDELETE, CURSOR) 
185 XK=U5RCT0GGLE, CURSOR) :HETUBM 
200 REM JOYSTICK INPUT 

210 JOV=5TICKf0) :IF J0V=15 THEM RETURN 
215 XX=USRtTOGGLE, CURSOR) 
220 IF J0V=7 OR J0Y=5 OR J0Y=6 THEM GO 
SUB RIGHT 

230 IF J0Y=11 OR J0Y=9 OR J0Y=10 THEM 
GOSUB LEFT 

240 IF J0Y=14 OR J0Y=10 OR J0Y=6 THEM 
GOSUB UP 

250 IF J0Y=13 OR J0Y=9 OR J0Y=5 THEN G 
OSUB DOHN 

255 XX=USH (TOGGLE, CURSOR) 
260 GOTO 200 

380 REM START BUTTON INPUT 
318 IF PEEKt53279)<>6 THEN RETURN 
315 XXrUSR {TOGGLE, CURSOR) 
320 GRAPHICS 0:RE« BACK TO DISPLAY ARE 
A 

330 GOSUB 1500 

340 IF CH=4 THEN GOSUB 1008: RETURN 
358 8M CH GOSUB SAU,LOD,LST 
368 GOTO 330 

408 REM OPTION BUTTON INPUT 
410 IF PEEK(53279)<>3 THEN RETURN 
428 MODE=MODE+l:IF M0DE>2 THEN MODE=0 
430 IF MODE=e THEN SETCOLOR 2,9,4 
440 IF M0DE=1 THEN SETCOLOR 2,12,6 
450 IF M0DE=2 THEM SETCOLOR 2,3,8 
460 FOR MAIT = 1 TO 58: NEXT MAIT:G8Te 48 
8 

500 S=USR(ASSCR,S+ASCC"[1]")) 
510 FOR I=5TART+2 TO D0C44079 
520 IF PEEK(I)=S THEN RETURN 
530 NEXT I 

548 ? "UNABLE TO FIND MARK ";CHRS(USR( 
5CRAS,S)) 
550 FOR 1=350 TO 1 STEP -1:MEXT I: RETU 

1000 POKE 0L+1,»0C/256:P0KE DL,0 

1818 CURS0H=1 : XCUR=1 : YCUR=8 : XX=USR (T8G 

GLE, CURSOR) 

1828 HIMD0U=8:H0DE=0: SETCOLOR 2,9,4 
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1090 RETURN 



1500 


'» 


"K" 


'."* ',"* 




1510 


t 


"1. 


SAVE 


DOCUfENT" 


1528 


•} 


"2. 


LOAD 


DOCUMENT" 


1530 


■» 


"3. 


LIST 


DOCUMENT" 


1540 


? 


"<t. 


UIEM 


AND EDIT":? 



1550 TRAP 1560:? "PICK ONE CI, 2, 3, OR 4 
3 "j:INPUT CH:CH=INTtCHJ :IF CH>8 AND C 
H<5 THEN 1570 
1560 ? "tt":GOTO 1550 
1570 TRAP 5000: IF CH=4 THEN RETURN 
1580 HARK5=8:TRAP 1598:? "ENTER 5TARTI 
NG HARK tt ";: INPUT MARKS : MARKS=INT (MAR 
KSJ 

1585 IF MARKS>9 OR MARKS<0 THEN ? "tt" 
:G0T0 1588 

1590 START=D0C-2:S=MARKS:G0SUB 500: IF 
1=8 THEN ? "tDtt":G0T0 1588 
1600 START::I 

1610 MARKF=l:TRAP 1620:? "ENTER ENDING 
MARK tt ";:INPUT MARKF:MARKF=INT tMARKF 
) 

1615 IF MARKF>9 OR MARKF<0 THEN ? "tt" 
:G0T0 1618 

1620 IF CH02 THEN S=MARKF : GOSUB 500:1 
F 1=0 THEN ? "tDtt":GOTO 1518 
1625 IF CH=2 THEN lnDOC+4079 
1630 FINISH=I 

1640 TRAP 1660:? :? "ENTER DEUICE ";:1 
NPUT DEUS:IF LEHCDEU$3=0 THEN DEU$="E: 
II 

1645 OPEN tt2,8-(CH=2J*4,0,DEUS 

1650 TRAP 5eO0:RETURN 

1660 ? "BAD DEUICEttt":G0T0 1640 

2880 REM INITIALIZATION 

2801 CLOSE ttl:OPEN ttl,4,0,"K" 

2002 RIGHT=30:LEFT=5e:UP=7e:DOMN=9O 

2083 5AU=2100:L0D=2200:LST=2380 

2884 T0GGLE=1537:A55CR=1557:5CRAS=1599 

:DELETE=1641:IHSERT=1681 

2818 D0C=PEEKCi536J«256 

2030 DIM DEUSC16> 

2888 DL=PEEKt560J+PEEKC561J»256+4 

2898 0LD=PEEKtDL}+PEEK<DL41)«256 

2897 RETURN 

2100 REM SAVE MODULE 

2110 FOR I=START+1 TO FINISH 

2120 PUT tt2,PEEKtIJ 

2130 WEKT I:CL05E »2 

2199 RETURN 

2280 REM LSAD MODULE 

2285 S=USR (AS5CR , MARKF + ASC C"@") J 

2210 TRAP 2250:FOR I=5TART+1 TO FINISH 

2220 GET tt2,KEV 

2230 POKE I,KEY:IF KEY=S THEN 2255 

2240 NEKT I;GOTO 2255 

2250 IF PEEKC195)<>136 THEN 50eO:REM I 

F NOT EOF 

2255 TRAP 5888: CLOSE tt2 

2299 RETURN 

2308 REM LIST MODULE 

2310 FOR I=STAHT+1 TO FINISH-1 

2320 PUT tt2,U5Rt5CRAS,PEEKCI3J 

2330 NEKT I:CLOSE tt2 

2399 RETURN 

5000 POKE DL+1, IHT (OLD/256} : POKE DL , OL 

D-PEEKCDL+1)»256 

5801 ? "ERROR "■ ; PEEK (195J ; " AT LINE " 

; PEEK (186J+PEEK (1871*256:? :STOP 



D:CHECK DATA (see p. 29) 



1 DATA 383,756,136,427,920 
,918,661^464,556,937,817,5 
96 DATA 516,319,615,1,957. 
4,908,549,790,69,726,993,7 
208 DATA 238,572,774,162,7 
2,785.931,147,894,183,885, 
350 DATA 827,788,984,686,5 
4,73,786,795,955,484,980,1 
1880 DATA 917,175,872,655, 
25,590,818,638,761,629,195 
1600 DATA 702,963,786,212, 
694, 29 , 785 , 411,543 , 763 , 825 



,762,104,546 

17,8904 

372,86,81,81 

788 

17,31,376,61 

482,7629 

8,406,558,48 

39,8683 

986,347,64,3 

,369,8325 

738,873,761, 

,10,9095 



2010 DATA 722,20,891,272,987,953,868,4 
17,616,811,893,439,135,153,553,8722 
2240 DATA 987,180,103,669,732,41,118,8 
73,671,917,575,5786 



ASSEMBLY LANGUAGE LISTING 



Katz 19 



81 .OPT HOEJECT 

02 .TITLE Letter Writer by A 

82 

18 TEMP=SD4 

28 UB0UND=$D6 

30 SAVEKEV=SD4 

48 *=S6e0 

50 LBOUHD .BYTE 

68 TOGGLE PLA KK=U5R (TOGGLE, CURSORJ 

70 PLA REM TURN OH/OFF CURSOR 

88 CLC CHAR=PEEK{DOC+CURSOR) 

90 ADC LBOUND IF CHAR>=128 THEN CHAR= 

CHAR-128 

0100 STA TEMP+1 IF CHAR<128 THEN CHAR 

=CHAR+128 

0110 PLA POKE DOCtCURSOR,CHAR 

0120 STA TEMP RETURN 

0130 LDY ttSO 

0140 LDA (TEMP],Y 

8150 EOR tt$80 

0160 STA (TEMP),Y 

0170 RTS 

0190 ; 

0280 ASSCR PLA KEY=USR CASSCR, KEVJ 

0210 PLA REM ASCII TO DISPLAY 

0220 PLA FLAG=8 

0230 STA SAVEKEV IF KEY>=128 THEN KEY 

=KEY-128:FLAG=128 

8248 LDA ttO IF KEY<32 THEN KEY=KEY+64 

+FLAG: RETURN 

8250 STA SAVEKEY+1 IF KEV>=96 THEN KE 

Y=KEY+FLAG:RETURH 

0260 LDA SAVEKEY KEY=KEY-32+FLAG : RETU 

RN 

8270 AND tt$6e 

0280 CMP tt$ee 

8290 BHE H0TL32 

8308 LDA SAVEKEY 

8310 CLC 

8328 ADC ttS48 

8338 STA SAVEKEV 

0340 RTS 

0358 H0TL32=» 

0360 LDA SAVEKEY 

0370 AND tt:S60 

0388 CMP »S68 

0390 BHE N0TGE96 

0400 RTS 

0410 H0TGE96=K 

0420 LDA SAVEKEY 

0430 SEC 

0440 SBC «S28 

8450 STA SAVEKEV 

8468 RTS 

8480 .PAGE SCRAS, DELETE 

0490 SCRAS PLA KEY=USR (SCRAS, KEY) 

0500 PLA REM DISPLAY TO ASCII 

0510 PLA FLAG=0 

0520 STA SAVEKEV IF KEV>=128 THEN KEY 

=KEY-128:FLAG=128 

0538 LDA «8 IF KEY>=64 AND KEV<96 THE 

N KEY=KEY-64+FLAG:RETURH 

0540 STA 5AVEKEV+1 IF KEV>=96 THEN KE 

Y=KEY+FLAG:RETURM 

0550 LDA SAVEKEY KEY=KEY+32+FLA6 : RETU 



RN 
8560 


AND 


tt^OO 


0570 


CMP 


ttS40 


0580 


BNE 


H0TL32K 


0590 


LDA 


SAVEKEV 


0680 


SEC 




0610 


SBC 


ttS4e 


0620 


STA 


SAVEKEV 


0630 


RTS 




0640 


H0TL32K=« 


0650 


LDA 


SAVEKEY 


0660 


AND 


«560 



FOR THE 

ATARI 
400/800 



4i 



by James Albanese 




Nail-biting arcade excitement! 
Available on diskette or cassette. 
Requires 32K of user memory. 
At your ATARI software dealer — $29.95 




QUTiLrry 

SOFTW7IR6 



6660 Reseda Blvd., Suite 105 
Reseda, CA 91335 
(213) 344-6599 



lA 'if 



'«8 








We've Got More Than A 
Fond Attachment For Your 

ATARI 

^ We've Got A Disk Drive For $488. 

Percom Data Corporation believes your Atari* home computer is more than just 
fun and games. We believe you should be able to get a single-density floppy-disk- 
system for your Atari 400 or 800 at a price that w/iil take you into the future v/ithout 
knocking you into the next galaxy 

Percom Data has been manufacturing disk-drive systems, and other accessories 
for personal computers since the mid-1970's and is the industry standard to 
follow when it comes to data separation and system compatibility 

The Percom Data AT-88 combines Percom Data quality and reliability at a price 
that is not a budget-buster. 

The Percom Data AT-88 offers 88 Kbytes (formatted) in single-density, with plug- 
in ease of attachment to your Atari. The AT-88 has integral power supply, "no- 
patch" to Atari DOS and critical constant speed regulation. 

Take advantage of this low introductory price of $488 by calling Percom Data now 
to get more information, or the name of an authorized dealer nearby. Call toll-free 
^ 1-800-527-1222 



[?mm m\] 



CORPORATION 

pahding Your Perlpherai Vision 



DRIVES • NETWORKS » SOFTWARE 



toad Dallas Texas 752-<l3 '2141 340-7081 
1-800-527-1222 



0670 

0680 

0898 

0700 

0718 

0720 

0730 

0740 

0750 

0770 

0780 

0790 

OR 

0800 

0810 

0820 

0830 

0840 

0850 

0860 

0870 

0880 

0890 

0900 

0918 

0920 

0930 

0940 

0950 

0960 

0970 

0980 

0990 

1080 

1818 

1830 

1848 

1050 

R50R 

1060 

5TEP 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1298 
1380 
1310 
1320 
1330 
1348 
1350 
1360 
1370 



CMP tt$60 
BNE N0TGE9eX 
RT5 
M0T6E96X=* 
LDfl SflUEKEY 
CLC 

ftDC ttS20 
STft SftUEKEY 
RT5 

DELETE PLfl KX=U5R (DELETE, CURSOR) 
PLft REM DELETE ONE SPACE ftT CURS 




FOR I=DOC*CURSOR TO DOC+4095 

LBOUND POKE I,PEEKCI+1) 

TEMP+1 NEKT I 

RETURN 

TEMP 

LBOUND 

tt$ 10 

UBOUND 

ttl 

CTEMP) ,Y 

tTEMPJ.Y 

TEMP 

LOOP 

TEMP+1 

TEMP+1 

UBOUND 

LOOP 



CLC 

-1 

ODC 

STft 

PLA 

5T« 

LDA 

CLC 

ADC 

5TA 

LDA 

5TA 

LDY 



FOR I=D0C+4895 TO DOC+CURSOR 



FIRST BORN IN 1978! 



the original & continuously updated 

CCA 
Data Management 

System 



NowAvailable For Atari Computers $ 99.50 

For Apple Computers 150.00 

For CPM Based Computers 225.00 

CCA Data Management System 



Uses 



LBOUND 

TEMP+1 

RETURN 

TEMP 

LBOUND 



POKE 
NEKT 



I + l, 

I 



PEEKCIJ 



' Business 
Accounts Receivable 
Accounts Payable 
Inventories 
Billing 

Lists and Rosters 
Home Phone Lists 
Budgets, Hobbies 



I 



Features And Capabilities 

> Long record lengths 

' Up to 24 fields per record 

' Not Copy Guarded 

' Alpha numeric items 
' Numeric only items 
' Add, update, scan, etc. files 
' 10-Level sorl ascending, descending, 
allows alphabetizing data file. 

• Contact your local dealer for 
details or write us for our catalog 



OIVISION OF CUSTOM ELECTRONICS INC 

SOFT\A/ARE 

238 Exctiange St,, Chicopee, Majiochusetts 01013 

(413) 592-4761 

Moitercord & VISA Accepted 

• Dealer And Distributor Inquiriel Invited 

Cloied Mondays - Open Doily 'Til 5:30 - Fridoys 'Til 8 




ttSlO 
UBOUND+1 

no 

UBOUND 

no 

L00PK=» 

LDA UBOUND 

BNE NOZNC 

DEC UBOUND+1 
NOINC=» 

DEC UBOUND 

LDA (UBOUND}, 

INY 

5TA 

DEY 

LDA 

CMP 

BNE 

LDA 

cra> 

BNE 
RTS 
OKCONT=» 
CLC 
BCC LOOPX 



(UBOUND) ^Y 

UBOUND 

TEMP 

OKCONT 

UBOUND+1 

TEMP+1 

OKCONT 




ATARI INTERFACE CABLES 

CABCON 

An Authorized Distributor of 
MNM Microcabling Products 

has the following cables available 
for immediate delivery: 

850 Interface to: MNM Part # 

'■ ^ ■ ■i^»^^— ill ■■■!■■ 11 ■!■ — II— —^—^^^^M I ^•^•^mm^m^ 

Epson MX80/100lparallel) MC11501-XX 

Okidata ML82A/83A*^parallel) MC11501-XX 

6' - $29.95 10' - $32.95 

Hayes Smart Modem ! MC22001-XX 

3' - $24.95 5' - $27.95 

RS232C Cable (All 25 pins connected) 

male-male MC22701-XX 

male-female MC22801-XX 

6' - $31.95 10' - $34.95 

400/800- Amdek Monitor Cable MC23501 

$32.95 



Dealer 
Inquires 
Invited 



15 MFCS TRADEMAIIK 



Terms 


CABCON 


C.O.D. 


Your Cable Connection 


Cash in Advance 


P.O. BOX 125 


$3.00 Handl i ng 


RICHWOOD, NJ 08074-0125 


plus UPS 


(609) 589-1158 


per shipment 


BUSINESS HOURS MON-FRI 


N.J. Res . add 


8:30 AM- 6:00 PM 


5% sales tax 
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CREATOR & DIETY 



DISK 16K 



by WiUiam Volk 



Creator and Diety seem to be strange names for 
computer programs, but their purpose suits these 
names quite well. 

Program generation seems to be the providence of 
the world of artifical intelligence, room-size 
computers, and science fiction. Surprisingly the 
ATARI, due to its well designed operating system 
and BASIC (yes, ATARI BASIC), is capable of 
generating BASIC programs. Creator and Diety are 
just that: program generators. Both of these 
programs create new programs, which are almost 
program generators themselves. 

Confused? Well, it is a strange idea. Perhaps the 
reason these programs were created will help show 
you what they do. 

Tele-Communication, Object Files, and Sectors 

If you have ever used a BBS (Bulletin Board 
System, like M.A.C.E., Team ATARI, or even 
CompuServe), you have probably heard of 
downloading. Downloading allows the ATARI user, 
equipped with a modem, software, and disk, to 
receive programs over the phone. These programs 
take the form of "LISTed" BASIC programs. 

The problem concerns the transmission of 
machine -language binary files, FORTH screens and 
Auto-Boot disk programs. How do you transfer 
these programs? 

Some terminal programs try to solve this problem 
by including code to handle transmissions of binary 
files. Most BBS's do not support this because of 
several problems with this technique. 

1. No one has a standard way of doing this. 

2. Binary files contain 8 bit words. Most terminal 
programs allow only 7 bit ASCII. 

3. There is a limit to how much can be sent/ 
received (24K is the best I have seen, without 
XON/XOFF). 

THE SOLUTION 

I was looking at a BASIC program that I had 
received from the Oregon BBS (A.C.E.) called 
MICRODOS. This was a BASIC program that 
when run created an object file on disk (as in 
Maniac! from A.N.A.L.O.G. No. 6.) 

Why not send all object files in this form? 

Why? Because the size of a BASIC program that 
creates an object file is typically 3 to 4 times the size 
of the object file, because it is hard to create (HINT, 
HINT!) these programs, and because you are limited 



in transmission to about 20K. 

The BASIC program MICRODOS uses DATA 
statements of the form: 

100 DATA 100, 23, 45, 230, 33 etc. etc. 

One way to solve this problem was to adapt a new 
form of DATA statement of the form: 

100 DATA 03F3A5CF2F etc. etc. 

The bytes of the file are encoded into a 
hexidecimal DATA statement. The BASIC program 
is a little over two times the size of the object file. 

As to the 20K problem, why not have several 
BASIC programs that when run in sequence, create 
the object file? The first one to OPEN the object file 
for a write, the following BASIC programs to 
perform an APPEND. 

A Program Generator named Creator 

The third problem, (the difficulty in writing these 
BASIC programs) was solved by writing a program 
generator. 

When Creator is run, it prompts the user for an 
object file name, and a 7 character name for the 
series of BASIC programs it creates. 

These programs are named D:PROGRAM0 
.ASC, D:PROGRAMl.ASC, etc. When they are 
run in sequence, they re-create the object file. Up to 
nine BASIC programs (in LISTed format) are 
created. Each generates lOK of object code, 
maximum. Each is a little over 20K in listed form. 

The Creator Program 

Here is a brief description of this program, and 
what the various lines do. 

LINE 10 Dimensions the strings, used to hold 
filenames. HEX$ contains the Hexidecimal digits, 
used to generate the Hex DATA statements. 

LINE 20-50 Gets the names of the Object File, 
and creates the name for the listed BASIC programs. 

LINES 60-80 Opens the object file to get its 
content. Sets the OPEN instruction, to be included 
in the generated program, for a WRITE. Following 
programs will APPEND the object file. Starts the 0- 
9 loop that will generate up to 10 BASIC programs 
(it can't go over 5, due to the 48K memory 
limitadon). Generates the name for this BASIC 
program, stored in BDS$. 

LINE 90 Here is one of the better features of the 
ATARI, and ATARI BASIC. Lines 600-999 are 
"LISTed" to the file BDS$. These comprise the bulk 
of the generated BASIC programs. TTien the file 
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BDS$ is opened for an APPEND operation, so the 
DATA statements and correct OPEN statements can 
be added. 

LINE 100 Goes to a subroutine at LINE 1000. 
This subroutine generates line 650, the open 
command, in the generated programs. 

LINES 110-190 Sets all following operations, on 
the object file, to APPEND (variable OPR). Creates 
the HEX DATA statements by getting a byte from 
the object file and converting it to HEX by breaking 
it into high/low nibbles and using HEX$. Note that 
X contains the line # of the data statement. 

LINES 200-500 Line 200 is the end of the 
generating program, if no errors occur. The Trap 
statement in LINE 110 will go to line 500, which 
must send a carriage return to the created BASIC 
program (or else the last DATA statement will not 
be interpreted during the "ENTERing" process). 
This Trap should occur when all the bytes of the 
object file have been read. 

LINES 600-700 This is the generated program. 
(Line 650 is replaced in subroutine 1000. If 2 lines 
have the same line # in a listed BASIC program, the 
last one takes precedence.) Note the HEX- 
DECIMAL conversion routine in line 680. It makes 
use of a logical operation as a value. I think this is 
probably the shortest HEX-DECIMAL conversion I 
have seen. 

What About DEITY? 

If CREATOR seems to be strange, consider the 
case of DIETY. 

FORTH and BOOT-DISKS don't use the ATARI 
file structure at all. Transferring FORTH screens, or 
BOOT disks on the phone seemed an impossibility. 
Data for these files is simply physical sectors. There 
are no "real" files. 

After I had finished CREATOR, this problem 
seemed to have a solution. If I could write a BASIC 
program that wrote out physical sectors, then I 
could write a program generator that read those 
sectors and generated such a program. 

Since this program would be more powerful than 
CREATOR I decided to name it DIETY. DIETY 
prompts you for a start sector, the number of sectors 
(up to 80), and generates a BASIC program that, 
when run, will re-generate those sectors. Finally I 
could send out those FORTH screens to BBSs. 

The DEITY Program 

LINES 10-100 Dimensions the strings and loads 
the "Sector-Read" code into memory. Prompts the 
user for the start and # of sectors to be read. 

LINES 110-150 Reads the sectors into memory. 

LINES 230-290 Prompts the user for the name of 
the BASIC program to be created. 

LINES 290 As in CREATOR, lists out the lines of 
the BASIC program 600-2999, then opens it for an 
append. 



LINE 300 Goes to the subroutine at line 5000, 
which sets assignment statement (in line 610, of the 
generated program) for AMMT and START, the 
amount and starting sectors. 

LINES 310-400 Goes through the memory, that 
now contains the sectors, and builds the data 
statements. This ends the generator program. 

LINES 600-840 The generated program, reads 
the data statements, POKEs them into protected 
memory, and calls the sector write routine at 
subroutine 2000. 

CONCLUSION 

How many times have you written the same type 
of program over and over again (i.e. a DATABASE 
program)? Program generation is a powerful 
technique for saving time and effort. 

FORTH people take note: in future articles I will 
show how to get a link between ASCII text files, and 
FORTH screens, using similar methods as above. D 



1 REM CREATOR BV MILLiarf UOLK 

2 REM C0URTE5V OF S.P.fl.C.E 

3 REM 5E«C0ft5T PERSONAL ATARI COMPUTER 
ENTHUSIASTS 

4 REM THIS MASTERPIECE MAKES A BASIC P 
ROGRAN 

5 REM THAT MILL "RECREATE' AN OBJECT F 
ILE, ON DISK 

6 REM THIS ALLOWS THE OBJECT FILE TO B 
E SENT OUER A MODEM 

7 REM IN THE FORM OF A 'LISTed' BASIC 
PROGRAM 

8 REM HHEN THE CREATED BASIC PROGRAM I 
5 RUN, IT RECREATES THE OBJECT FILE!!! 
3 REM THE PROGRAM HILL PROMPT YOU FOR 
THE NAME OF THE OBJECT FILE, AND THE ■ 
LISTed- PROGRAM 

10 DIM OBJ$(28J,BDSSf20),HEKSClBJ,ASf7 
> : HEK$="0123456789ABCDEF" : BDSS="D : 

0.A5C" 
20 ? "IfNAME OF OBJECT FILE, TO BE IRAN 
SFERED ":? "I.E. D:MICRODOS.OBJ ":INPU 
T OBJ:S 

38 ? "HA NAME, 7 LETTERS MAX, FOR THE 
SERIES":? "OF 'LISTed' BASIC PROGRAMS, 

THAT HILL" 
40 ? " BE CREATED, AND RUN IN SEQUENCE 
,":? "IN ORDER TO RE-CREATE THE OBJECT 
":? "FILE, YOU PREVIOUSLY NAMED":? :? 

59 ? "THIS COULD BE ' MOONBSE '": INPUT A 
S:IF LENCASX? THEN A$ (LENCA5) +1) ="AAA 
AAAA" 

60 OPEN ttl,4,0,0BJ$ 

78 0PR=8:F0R FILE=0 TO 9 : BDSS C3, 9) =A$ : 

BDSS CIO, 10) =STRS CFILEJ 

88 ? "CREATING BASIC PROGRAM NAMED "j6 

DSS 

S8 LIST BDS$,6e8,9?S:CL0SE ft2:0PEN »2, 

9,e,BDS$ 

108 GOSUB 1008 

lie 0PR=9:TRAP 588 

128 FOR X=ie80 TO 2000 STEP 18 

138 ? tt2;K;" DATA "; 

148 FOR V=l TO 50: GET ttl, A:HI=INT tA/16 

) :L0=A-CHI»16J :LO=LO+l:HI=HI+l 

158 ? tt2;HEX$CHI,HI);HEX$CL0,L0]; 

168 NEXT Y 

178 ? tt2 

188 NEXT X 

198 CLOSE lt2:NEXT FILE 

288 CLOSE ttl: CLOSE tt2:END 

see ? tt2: CLOSE ttl: CLOSE tt2:END 

688 REM THE PROGRAM TO CREATE THE OBJE 

CT FILE 

618 D^IN A$Cie8] 

628 TRAP 908 
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630 RESTORE 

648 REM OPEM THE FILE FOR OUT-PUT OR A 

PPEND 

650 REN THIS LINE WILL BE REPLACED BY 

THE PROPER OPEN COMMAND 

660 READ AS: FOR K=l TO 58 

678 ft = ASC CAS C tK#23 -13 3 : B = A5C CAS CK»2) 3 

688 HI= CA-483 - CA>643«7 : L0= CB-483 - CB>64 

)*7:BVTE=L0+HI«16 

698 PUT »1, BYTE .NEXT X 

788 GOTO 668 

908 CLOSE ttllEND 

1888 REM ADDS THE OPEN COMMAND TO THE 

BASIC PROGRAM 

1818 ? t»2;"658 OPEN ttl";:PUT «2,44:? tt 

2,0PR;:PUT 112,44:? tt2;8;:PUT n2,44:PUT 

tt2,34:? »2jOBJSj:PUT tt2,34:? tt2 
1850 RETURN 



D:CHECK DATA (see p. 29) 

1 DATA 75,853,331,276,751,937,976,358, 

360,266,963,362,638,153,283,7582 

78 DATA 525,392,509,825,577,535,378,28 

1,973,443,971,782,1,323,644,8159 

688 DATA 161,995,517,898,814,421,287,8 

3,687,982,886,419,818,989,955,9584 



1 REM DIETY BY HILLIAM VOLK 

2 REM COURTESY OF 5.P.A.C.E 

3 REM SEACOAST PERSONAL ATARI COMPUTER 
ENTHUSIASTS 

4 REM THIS MASTERPIECE MAKES A BASIC P 
ROGRAN 

5 REM THAT WILL "RECREATE" SECTORS, ON 
DISK 

6 REM THIS ALLOWS THE SECTORS TO BE SE 
NT OVER A MODEM 

7 REM IN THE FORM OF A "LISTed" BASIC 
PROGRAM 

8 REM WHEN THE CREATED BASIC PROGRAM I 
S RUN, IT RECREATES THE SECTORS ! r ' 

9 REM THE PROGRAM WILL PROMPT YOU FOR 
THE STARTING SECTOR, AMT & NAME OF LIS 
Ted" PROGRAM 

18 DIM BDSSC28J,HEXSC163,ASC73 :HEXS="'8 

123456789ABCDEF" : BDSS="D : 8 . ASC" 

28 POKE 1664,184:P0KE 1665,32:P0KE 166 

6,83:P0KE 1666,83:P0KE 1657, 228 :POKE 1 

668,96 

SO ? "THIS PROGRAM LOADS SECTORS" 

68 ? "INTO MEMORY, AND CREATES A" 

78 ? " A BASIC PROGRAM TO RE-CREATE TH 

OSE SECTORS" 

88 ? "START SECTOR"'; : INPUT START 

98 ? "HOW MANY SECTORS l-88"j:INPUT AM 

MT:IF AMMT>88 THEN 98 

95 LOC=PEEK C1443 +256»PEEK C145J +388 

188 ? "INSERT DISK IN DRIUE » 1, TO RE 

AD 5ECT0RS":INPUT AS 

118 BUFFER=LOC:SECTOR=START 

129 FOR 1=1 TO AMMT 

138 GOSUB 4886 

148 5ECT0R=SECT0R+1 : BUFFER=BUFFER+128 

238 ? "«A NAME, FOR THE 'LISTed" BASIC 

PROGRAM, THAT MILL" 
248 ? " BE CREATED, AND RUN"':? "IN ORD 
ER TO RE-CREATE THE SECTORS":? "YOU PR 
EVI0U5LY NAMED":? :^ 

PUT BDss"^^ coulu be D:M00NBSE.ASC":IN 
||« ? "CREATING BASIC PROGRAM NAMED "J 

P% LIST BDSS, 680, 2999:CL0SE tt2:0PEN « 

2, 9, 8, BDSS 

388 GOSUB 5888 

318 PTR=LOC 

328 FOR X=3e88 TO AMMTK4e+2998 STEP 10 

338 ? »2;K,-" DATA "; 



340 FOR Y=:l TO 32 : A=PEEK CPTR3 : HI=IHT CA 

/163 :L0=A-CHI»163 : LO-LO+l : HI=HI+1 

358 ? tt2;HEKSCHI,HI};HEXSCL0,L03; 

368 PTR=PTR+l:HEKT Y 

378 ? «2 

388 NEXT K 

408 CLOSE 02: END 

680 REM THE PROGRAM TO CREATE THE SECT 

ORS ON A DISK 

610 REM LINE TO BE REPLACED WITH COHRE 

CT ASSIGNMENT STATEMENTS 

620 L0C=:PEEKC1443+256»PEEKC1453+3e8:PT 

R=LOC:BUFFER=LOC:SECTOR=START:DIM ASC6 

43 

625 POKE 1664,104:P0KE 1665,32:P0KE 16 

66,83:P0KE 1666,83:P0KE 1667, 228 : POKE 

1668,96 

630 FOR Y=l TO AHMT»4 

640 READ AS 

650 FOR X-1 TO 32 

678 A=ASC CAS C CX«2) -1) 3 : B=fiSC CAS CK»2J ) 

680 HI= CA-483 -tA> 643*7 :L0= CB-483 -CB> 64 

3«7:BYTE=L0+HI»16 

690 POKE PTR,BYTE:PTR=PTR+1 

788 NEXT X:NEXT Y 

880 FOR 1-1 TO AMMT 

818 GOSUB 2868 

828 SECT0R=SECT0R+1 

830 BUFFER=BUFFER+128 

840 NEXT I:END 

2088 BUFHI=IHTCBUFFER/2563 

2818 BUFL0=BUFFER~BUFHI»256 

2820 POKE 772,BUFL0:P0KE 773,BUFHI 

2838 POKE 769,1:P0KE 778,87 

2848 SECHI=INTCSECT0R/2563 

2858 5ECL0=5ECT0R-5ECHI»256 

2060 POKE 778,SECL0:P0KE 779,SECHI 

2878 RE5ULT=USRC16643 

2888 RETURN 

3208 BUFFER=:L0C:SECT0R = 5TART 

3210 FOR 1=1 TO AMMT 

3228 GOSUB 2888 

3238 SECT0R=SECT0R+l:BUFFER=BUFFER+128 

3248 NEXT I 

3588 END 

4880 BUFHI=INTCBUFFER/2563 

4810 BUFL0=BUFFER-BUFHI»256 

4828 POKE 772,BUFL0:P0KE 773,BUFHI 

4838 POKE 769,1:P0KE 778,82 

4848 5ECHI=IHTC5ECT0R/2563 

4858 SECL0=SECT0R-SECHIK256 

4868 POKE 778,SECL8:P0KE 779,5ECHI 

4878 RESULT=USRC16643 

4888 RETURN 

5880 REM CREATE PROPER LIMITS 

5818 ? tt2;"618 AMMT="J AMMTj " : 5TART="J S 

TART 

5858 RETURN 



D:CHECK DATA (see p. 29) 

1 DATA 11,985,289,388,822,478,434,638, 

585,353,594,637,629,576,484,7799 

98 DATA 785,989,381,51,565,885,428,429 

,604,491,69,542,729,883,622,8213 

328 DATA 629,382,857,977,853,992,448,1 

28,75,544,223,929,644,458,161,8284 

678 DATA 382,454,79,652,587,848,696,98 

3,286,628,521,567,232,442,751,8828 

2868 DATA 496,987,964,181,656,194,478, 

793,85,425,782,492,364,649,994,8380 

4860 DATA 683,88,655,84,375,967,2772 



For more on Forth, 
turn to page 42. 
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VCS UPDATE... 



by Lee Pappas 



Since Issue #7 many new games have appeared on 
the market place. Twentieth Century-Foxes' Games 
of the Century division has announced four new 
game titles for release by the holiday season: Alien, 
Fantastic Voyage, Turmoil, and MegaForce. 

In Alien, patterned after the science fiction/ 
horror film of the same title, the player's mission is 
to destroy the horrid space creatures before they get 
you first. 

Fantastic Voyage is based on the 1966 film 
which starred Stephen Boyd, Raquel Welch, and 
Donald Pleasence. ("Nothing's changed as tar as my 
authority goes!") Like the motion picture, you must 
navigate your miniaturized submarine through the 
body of a critically ill patient and destroy a life- 
threatening blood clot, while avoiding antibodies 
and defensive cells. 

Turmoil and Megaforce are also action games, 
the latter named after the not-so-hot film of the same 
name. 

Alien, Megaforce, and Turmoil list for $34.95 
and Fantastic Voyage for $31.95. 



COLECOVISION 

Colecovision will shortly have their VCS-compat- 
ible interface on the market, allowing over two 
hundred additional cartridges to be used on that 
system. The unit plugs into the regular cartridge slot 
and provides a new port to plug the VCS-type games 
into, along with two ATARI- type controller ports. 
Coleco will also be releasing an Intellivision cartridge 
adapter, but who cares? (Except George P.!) 

The ATARI 5200 

I've had the ATARI 5200 for a couple of months 
now, and must admit it's a nice mixture of hardware 
and software. The versions of PacMan, Missile 
Command, Star Raiders, etc. resemble those on 
the 400 &L 800, with some added enhancements and 
changes. Star Raiders has an improved long range 
scan: instead of blips for moving ships and 
asteroids, there are now small graphic 
representations of each object. Meteors look like 
meteors, basestars like basestars, and so on. Also, 





The definitive, super-fast, multiple skill 

shoot-out gccme for Atc[ri®400/800™ 

with superb - — 

cffcade-type 

recclism. l 



Retail price for 16K cassette or disk: =39.95 
One or two player game. 
Coming soon Venus Voyager, Time Warp, and 
more programs by fine Englisli software 
designers and authors. 

The English Software Company 

P.O. BOX 3185 • REDONDO BEACH, CALIFORNIA 90277 

(213)372-3440 

Direct orders welcome. 



u^^ «r. 



ENGLISH SOF 



)1982, English Software Company • Atari is a trademarlc of Atari, Inc. • English Software is not related to Atari, Inc. 
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the galactic map is slightly changed. On Super 
Breakout, when the bricks are struck, they 
"disintegrate" rather than just vanishing quickly. 
Space Invaders is really wild on the 5200; the 
creature shapes in this game are the weirdest yet. 
This version also has the barriers in it. 

The hand controllers are excellent, consisting of a 
combination joystick and small keyboard. The 
joystick is a non-centering variable unit with 
proportionality. For example, the nnore you push it 
in one direction (while playing Star Raiders) the 
faster the ship turns. I had a tough time getting used 
to the small keyboard inputs (and I'm no slouch at 
Star Raiders either). The keyboard has nice rubbery- 
type keys with very good "positive" feedback as to 
which keys were pressed. The games come with 
overlays labeling the proper keys with their 
corresponding functions. The controllers also have 
the firing buttons on both the right and left sides so 
there is no prejudice against left handers here. 

Basically, there are similarities with the 5200 and 
the 400/800. The programs are virtually identical, 
however, the addressing points for the software are 
quite different, thus the computer cartridges could 
not work on the 5200 (cartridge size and contact pin 
size are also physically different). There are plans to 
add on a CX2600 adapter to run all of the VCS 
cartridges, a trackballAeyboard option, and voice 
synthesizer package. 

VCS in 1983 

Many new games from ATARI are planned for the 
new year! Early 1983 should see the release of 
Vanguard, Mrs. PacMan, and Fireworld. In 
March there are plans to release Centipede, The 
Dukes of Hazard, and Galaxian. Games for release 



later include Dig Dug, Waterworld, and several 
new sports games with much improved graphics. 
There will also be a series of Muppets, Disney, and 
Sesame Street cartridges. D 




32k RAM 

FOR 

ATARI 400/800 



Only Tech'Data can offer such top quality at so 
low a price. Our Ram board features: 

• Lifetime Warranty 

• Gold-plated edge 
connectors 

• Compatabiiity 
with Atari 400/800 

Dealer Inquiries Invited 

800-237-8931 
In Fla.: 813-577-2794 



p 



Tech •Data Corporation 

3251 Tech Drive North, St. Petersburg, FL 33702 



ATTENTION PROGRAMMERS! 

A.N.A.L.O.G. Computing is interested in programs, articles, and software review submissions 
dealing with the ATARI 400 and 800 home computers. If you feel that you can write as well as you 
can program, then submit those articles and reviews that have been floating around in your head, 
awaiting publication. This isyouropportunitytoshareyourknowledgewith thegrowingfamily of 
ATARI computer owners. A.N.A.L.O.G. pays comparable to many other computer magazines. All 
submissions for publication must be typed, upper and lower case with double spacing. Program 
listings should be provided in printed form, and on cassette or disk. By submitting articles to 
A.N.A.L.O.G. Computing, authors acknowledge that such materials, upon acceptance for 
publication, become the exclusive property of A.N.A.L.O.G. If not accepted for publication, the 
articles and/or programs will remain the property of the author. If submissions are to be returned, 
please supply a self-addressed, stamped envelope. All submissions of any kind must be ac- 
companied by the author's full address and telephone number. Send programs to: Editor, 
A.N.A.L.O.G. Computing, P.O. Box 23, Worcester, MA 01603. 
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HARVEY WALL6ANGER 



CASSETTE OR DISK 16K 



by Charles Bachand 



In this version of the nowfamous "Non-Tutorial" 
series, 1 thought it would be a good time for a small 
machine language game. Something simple, yet fun. 
Something with action, sound effects, player missile 
graphics, and absolutely FREE. After banging my 
head against a wall for ten minutes and coming up 
with some obvious rip-off's like "PacMan Meets 
Godzilla" and "Communist Preppies From Space", I 
thought of having a rabbit (you must remember 
Harvey, the invisible rabbit, from the movie by the 
same name?) in a room with walls moving in on him. 
Sound good? 

Here is a very quick description of the game so far: 
Harvey Wallbanger is situated in the middle of a 
closed-in room. He may move freely within the 
room (that part of the screen within the four walls) 
but the room is constantly getting smaller (the walls 
are moving in on our rabbit friend.) Harvey is 
allowed to touch the left and right hand walls, but he 
will be killed if flattened by these two walls. He is 
under no circumstances allowed to touch the top and 
bottom walls, for they are highly electrified. 

All is not lost for Harvey, however. He does have 
his patented "Wallbanger Gun" ™ to shoot at the 
walls and make them move away. His only problem 
is that the speed of the moving walls constantly 
increases with time. Numbers will appear on the 
screen that Harvey may collect. These numbers will 
be added to his score. The faster you collect the 
numbers, the bigger the final score. The numbers 
may not be within the confines of the now-receding 
wall and this will necessitate that Harvey shoot back 
a wall to access the numbers. Also, Harvey cannot 
shoot the numbers as this will kill off that particular 
number and generate a new one someplace else. By 
the way, I happen to be thinking up this game as I am 
writing this description. (Shows you hoiv organized he 
is. Ed.) 

As you read the Assembler listing for the game 
you will notice that there are no line numbers in the 
source code. This is due to the fact that I am using the 
ATARI Macro Assembler package exclusively now. 

There are two BASIC programs following the 
machine language listing of Harvey Wallbanger. The 
first is a disk file maker program to get the game up 
and running faster than typing in the Assembler 
source listing. The second BASIC listing will contain 
modifications to the first to make a cassette bootable 
machine language tape for the cassette-bound 
crowd. D 



IttRVEY UALLGAN6ER by Charles Bachand 



Copxri^t (C) 1982 ftft^W Hagazine 



Operating System Equates 



HP0SP8 

M8PF 

HP0SP2 

HP0SP3 

HP0918 

P9PF 

PBPL 

GRP2 

COLBK 

GRACTL 

HITCLR 

CCNSOL 

AUDFl 

AUDCl 

AUDF2 

AUDC2 

AUDF3 

AUDC3 

AUDF4 

AUDC4 

fV)NDGM 

IROEN 

PMBASE 

WSYNC 

VCOUNT 

XITVBU 
SIOIMT 
ATRACT 



RTCLOK 
COTMVl 
CDTW2 
CDTmi 
CDTW2 
SDHCTL 
SDLSTL 
a>RIOR 
STICK8 

STRiee 

PC0LR8 
PCOLRl 
PC0LR2 
PC0LR3 
C0L0R2 
COLORS 
C0L0R4 



$0668 
$0862 
$0883 
4D8B4 
i0884 
«D88C 
i068F 
SDSIA 
SD8iD 
«D81E 
«061F 
$0286 
$0281 
$0282 
$0283 
$0284 
$0285 
$0286 
$0287 
$D2eA 
$028E 
$0487 
$048A 
$D48B 
$E45C 
$E462 
$E4<i5 
$8840 



player 8 horizontal position 

nissile 8/playfield collision 

player 2 horizontal position 

player 3 horizontal positim 

missile 8 horizontal nosition 

player B/playfield collisions 

player 8 to player collisions 

player 2 graphics register 

background color 

qrapnics control register 

collision 'HIT' dear 

console switch pwt 

audio -frequency 1 

audio volume 1 

audio frequency 2 

audio uolune 2 

audio frequency 3 

audio volume 3 

audio -frequency 4 

audio volume 4 

randon number generator 

IRQ interrupt enable 

P/H base address 

wait for horizontal sync 

scan line cminter 

set vertical blank vector 

vertical blank exit vector 

serial I/O initialization 

atract mode counter 



System Shadow Registers 



$8812 
$8218 
$82IA 
$8226 
$8228 
$822F 
$6238 
$826F 
$8276 
$8284 
$82C8 
$82CI 
$82C2 
$82C3 
$82C6 
$62C7 
$82C8 



1 
2 

1 vector 

2 vector 



system clock 
system timer 
system timer 
system timer 
system timer 
»tt control 
display 1 ist pointer 
graphics priority 
joystick 1 
trigger 1 
player 8 colw 
player 1 color 
player 2 color 
player 3 colw 
playfield 2 color 
playf ield 3 colw 
background color 
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Page Zero Variables 



PSMSG DB 
DB 
DB 



'pres' 
's',e,8,'5' 



PIC 



ORG 
DS 



;area not used by %ysU 
; rabbit image pointer 



Player /Missile RflM Space 



ORG $3888 |out of ever/ones way 



j-first area not used 
iHissile graphics area 
jplayer 8 graphics area 
jip layer 1 graphics area 
iplayer 2 graphics area 
jplayer 3 graphics area 



PM 


DS 


$188 


MI8L 


OS 


$88 


PLR8 


DS 


$88 


PLRl 


DS 


$89 


PLR2 


DS 


$86 


PLR3 


DS 


$88 



Prt^affl entry point 



JHP HARVEY 



Gane display list 



MORE 



INUHS 



DL 



DB 
DB 
DU 
DB 



DB 
DB 
DB 
DB 
DU 
DB 
DU 



$78 ,$78 :32 blank scan lines 

$78 $78 

$17' jmode 2 line w/LMS bit 

DISP ;address of gane display 

$87, $87 :9 more mode 2 lines 

$87,$87 

$87, $87 

$87,$B7 

$87 

$7e,$7e jskip 16 lines 

$46 jmode 1 lime w/LMS bit 

SLINE ;address of score line 

$41 jjump on vertical blank 



DL 



;to start of display list 



SLINE 



RNUM 



SNUM 



Score 


line data 


DB 


'R'+$A8 


DB 


'A'+$Ae 


DB 


'B'mi 


OB 


'B'+$A8 


DB 


'I'+$A8 


DB 


'T'+$A8 


DB 


'SM$A8 


DB 


':'+$A9 


DB 


''3'+$A8 (number of rabbits 


DB 


' 't$A8 


DB 


'S't$A8 


DB 


'C'+$A9 


DB 


'0'+$AB 


DB 


'R'+$A9 


DB 


'E'+$Ae 


DB 


':'+$A9 


DB 


'0'+$A8 iscore display 


OB 


'8'+$A8 


DB 


'8'+$A8 


DB 


'e'+$A9 


Ganw over message 



Initialization Code 



tWRVEY 



GGMSG DB 
DB 



'game' 

9,8,'o«' 

'erS$88 



OLD 
JSR 
LDA 
STA 
IDA 
STA 
LDA 
STA 
STA 
STA 
STA 
LOA 
STA 
STA 
JSR 
LDY 
JSR 
DEY 
BPL 
LDA 
STA 
LDA 
STA 

im 

STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
STA 
LDA 
STA 
STA 
LDA 
STA 
LOA 
STA 
LDA 
STA 
LDA 
STA 
LOA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LOA 
STA 
LDA 
STA 
LOA 
STA 
LOA 
STA 
LDX 
LDY 
LOA 
JSR 
LOA 
STA 
LDA 
STA 
LDA 
STA 
LDA 



SIOIMT 

«'3'+$A8 

RNUM 

«3 

LIVES 

«'e'+$A8 

SNUM 

aJUM+1 

SNUM+2 

9<lli+3 

Ui 

TIM2Sr 

CDTW2 

CLSCRN 

412 

PUTNUM 

INUMS 

HDLi$FF 

SDLSTL 

#DL/256 

SDLSTL+1 

#$84 

GPRIOR 

«49 

BYLOC 

11196 

BYLOC+1 

#68 

BXLOC 

HP0SP2 

#184 

BXLOC+1 

HP0SP3 

#122 

HARX 

#55 

WRY 

#$2E 

SDMCTL 

#3 

GRACTL 

«PH/256 

PMBASE 

#$?6 

C0L0R2 

#$48 

COLORS 

#$18 

PC0LR8 

#$98 

PCOLRl 

#$34 

PC0LR2 

#$C4 

PC0LR3 

#1 

STRIGF 

#VB/256 

#VBi$FF 

#7 

SETVBV 

#Tli$FF 

CDTMAl 

#T 1/256 

CDTMAl +1 

#T2t$FF 

CDTm2 

#T2/256 



clear decimal flag 
stop cassette 
display for '3' 
3 lives (display) 
get 3 lives 
initialize counter 
display for '8' 
stcre in the four 
bytes used for the 
score display 
area. 

get 1 second count 
set reset value 
set system timer #2 
clear gane playfield 
display 3 numbers (8-2) 
put the number on screen 
decrement number counter 
done yet? No. 
Yes. low byte DL address 
DL pointer (low) 
high byte DL address 
DL pointer (high) 
set PF over PLAYER 
graphics priority 
nigh wall 
starting location 
low Nail 

starting location 
left wall 

starting location 
hardware register 
right wall 
starting location 
hardware register 
center screen-4 color clocks 
Harvey's initial X position 
center P/M-8 bytes 
Harvey's initial Y position 
set P/M DMA on bits 
store in DMA control 
set P/M enable bits on 
store in graphics control 
get high byte of P/M ackfr> 
point hardware to it 
light blue color 
default color too dark 
pink color 
same here 
gold color 
set rabbit color 
blue color 
set missile 1 color 
red-orange color 
left wall color 
green color 
right wall color 
initial ize trigger flag- 
to no shot fired 
address of VO (MSB) 
address of VB (LSB) 
deferred vertical blank opt 
set deferred Ublank vector 
atfcJr of timer 1 routine LSB 
set timer 1 vector LSB 
addr of timer 1 routine MSB 
set timer 1 vector MSB 
addr of timer 2 routine LSB 
set timer 2 vector LSB 
ackJr of timer 2 rcwtine MSB 
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STA 


CDTW2+1 


LDA 


#1 


STA 


CDTWHl 


LDA 


m 


STA 


HITCLR 


STA 


DIESU 


STA 


TICTOC 


STA 


yoLi 


STA 


V0L2 


STA 


IRQEN 


LDX 


#3 


UINCZ STA 


UINC,X 


STA 


SHOTXjX 


STA 


SHOTY,X 


STA 


SINCX,X 


STA 


sincy;x 


...... DEX 




BPL 


UINCZ 


TAX 




IH91 STA 


MISL,X 


STA 


PLR8,X 


INX 




BNE 


inei 


LDA 


«FF 


1H23 STA 


PLR2,X 
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INX 
BNE 



IN23 



set tiller 2 vector MSB 
^t 4.25 second count 
set systeti tiner tJl 
get a zero 

reset collision registers 
rabbit is alive 
reset tictoc counter 
start with no tictoc sound 
start with no shu-f-fle noise 
disable all IRQ interrupts 
set index value to 3 
zero wal 1 mover counter 
zero X nissile location 
zero Y missile location 
zero X missile increment 
zero Y missile increment 
next wall mower counter 
more walls/missiles? Yes. 
set index to zero 
clear Missile area 
clear Player 8, 1 area 
do next byte 
done yet? No. 
turn on pixels 
set Player 2, 3 area 
do next byte 
done yet? No. 



Main program used to generate the display. 
Actual qane done entirely during display's 
vertical blank processing routine. 



HBARS INX 




TXA 




m 


til 


TAX 




LDA 


BYLOC.X 


LSR 


A 


PHP 




yCHECK CMP 


VCOINT 


BNE 


yCHECK 


STA 


WSYNC 


PLP 




BCC 


ONELIN 


STA 


USYNC 


QNELIN LDA 


RANDOM 


AND 


#$F6 


STA 


COLBK 


LDY 


m 


LINES LDA 


ne 


STA 


GRP2.X 


STA 


USYNC 


LDA 


»!WDON 


AND 


UH 


STA 


COLBK 


DEY 




BNE 


LINES 


LDA 


C0L0R1 


STA 


COLBK 


LDA 


LIUES 


BEQ 


HBl 


LDA 


DIESW 


BPL 


HBl 


JMP 


MORE 


HBl LDA 


CDNSOL 


AND 


m{ 


BNE 


HBARS 


JMP 


HARVEY 



increment wall pointer 

transfer pointer to Ace 

mask o-f-f lowest bit 

put back in X register 

get wall vertical position 

divide by 2, od*=carry set 

save carry flag 

compare with line counter 

not yet! 

start at new line 

get carry flag back 

branch on even line number 

wait for next line 

random background color 

max 1 urn of 6 

fcr horizontal walls 

let's have 18 lines of this 

get a zero for overlap 

background overlaps player 

wait for next line 

randon background color 

max 1 urn of 6 

for horizontal walls 

decrement line counter 

18 lines done yet? No! 

get original background 

store in background 

more lives 

No. skip code 

a new I i f e? 

No. 

Yes. more lives 

check for start switch 

mask off bit 

start? No. 

restart game 



I 

B 
I 

a 
J 

Tl 



System timer til interrupt handler. 

Used to speed up walls every 4.25 seconds. 



LDA TIM2ST ;get wall speed 



TlMl 



T2 



LDA 


T1M2ST 


STA 


CDTW2 


INC 


BYLOC 


DEC 


BYLOC+1 


INC 


BXLOC 


LDA 


BXLOC 


STA 


HP0SP2 


DEC 


BXLOC+1 


LDA 


BXLOC+t 


STA 


HP0SP3 


INC 


TICTOC 


LDA 


TICTOC 


AND 


HI 


TAX 




LDA 


METRO, X 


STA 


AUDFl 


LDA 


#$88 


STA 


yoLi 


RTS 





CMP 112 :must stop at two 

BEQ TlMl ;i5 it two? Yes. 

DEC T1M2ST ;No, then decrement 

LDA HI iget 4,25 second cycle tine 

STA CDTWHl -reset timer HI 

RTS ;return 



System tiraer #2 interrupt handler. 

Used to move walls and initiate wall noise. 



get timer #2 value 
reset tinier tt2 
move tc^ wall down 
move bottom wall up 
change left wall location 
get new location 
change player 2 position 
change right wall location 
get new location 
change player 3 position 
increment TIC-TOt counter 
get counter value 
just need 8 or 1 value 
use for index 
get sound frequency 
change frequency 
get volume value 
save in volume counter 
return 



Deferred vertical blank processing routine. 
Here is where all the actual game playing 
takes place. This could be quite long. 



rabbit dying? 

He sure is. 

any 1 ives left? 

There sure are. 

clear screen of nimbers 

initialize X with zero 

stop tictoc sound 

stop dying sound 

stop gun noise 

stop number sound 

shut off the two timers 

ditto. 

same here. 

get a character 

end of scring? Yes. 
,Xjput on screen 
{increment index 
jcontinue 

zero the index 
get another character 
end of string? Yes. 
Xjput on screen 
increment inctex 
continue 

exit vertical blank 
player/player collisions 
store in ten^ variable 
player to PF collisions 
store in temp variable 
treasure sound counter 
end of sound? Yes. 
decrement volume 
divide volume by 2 
add pure tone 
change volume 
get tictoc volume value 
if <8 we prockice no sound 
decrement volume value 



VB LDA 


DIESW 


BNE 


VB8 


LDA 


LIVES 


BNE 


VB8 


JSR 


aSCRN 


LDX 


«8 


STX 


AUOCl 


STX 


AUDC2 


STX 


AUDC3 


STX 


AUDC4 


STX 


CDTWl 


STX 


CDTWl+1 


STX 


C0TMV2 


GOPRT LDA 


GOMSG.X 


BMI 


PSINIT 


STA 


DlSP+85, 


INX 




JMP 


GOPRT 


PSINIT LDX 


m 


PSPRT LDA 


PSMSG.X 


BMI 


uexiT 


STA 


DISP+144 


INX 




JMP 


PSPRT 


yexiT W 


IJ8X 


UBB LDA 


F8PL 


STA 


P8PLT 


LDA 


PBPF 


STA 


P8PFT 


LDA 


NSOUND 


BMI 


NOSND 


DEC 


NSOUND 


LSR 


A 


ORA 


IHAe 


STA 


AU0C4 


NOSND LDA 


VOLl 


BMI 


SND2 


DEC 


VOLl 
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0W\ 


»C0 


STA 


AUDCl 


SND2 LDA 


WL2 


Bfil 


SND3 


DEC 


U0L2 


om 


mi 


STA 


AUDC2 


SND3 LDA 


FREQ3 


INC 


FREQ3 


INC 


FREQ3 


INC 


FREQ3 


STA 


AUDF3 


LDA 


DIESU 


BEQ 


TMOgi 


INC 


DIESW 


INC 


PCOLRe 


INC 


PCOLRe 


LDA 


PC0LR8 


ASL 


A 


ASL 


A 


ASL 


A 


STA 


AUDF2 


LDA 


»88 


STA 


AUDC2 


JMP 


yex 


TMIWI LDA 


UINC 


BEQ 


TH0V2 


DEC 


UINC 


LDA 


BYLOC 


CMP 


#28 


BEQ 


TH0V2 


DEC 


BYLOC 


TMW2 LDA 


UINC+i 


BEQ 


TH0V3 


DEC 


UlNC+1 


LDA 


BYLOC+1 


CMP 


04 


BEQ 


TN(W3 


INC 


BYLOC+I 


THCW3 LDA 


WlNC+2 


BEQ 


TM0V4 


DEC 


UlNC+2 


LDA 


BXLOC 


STA 


HP0SP2 


(n> 


#3? 


BEQ 


TH(W4 


DEC 


E<LOC 


TM0M4 LDA 


UlNC+3 


BEQ 


TMOVX 


DEC 


UINC+3 


LDA 


BXLOC+1 


STA 


HP0SP3 


W 


«208 


BEQ 


TMOUX 


INC 


6XL0C+1 


TNOW LDA 


«8 


STA 


ATRACT 


STA 


XTEMP 


STA 


YTEHP 


LDA 


ST1CK8 


CMP 


mF 


BED 


CENTER 


LDA 


RTCLC»<+2 


AND 


#$87 


BNE 


CENILR 


LDA 


#$18 


STA 


AU0F2 


LDA 


#$84 


STA 


W12 


CENTER LDA 


STICK8 


SEC 




SBC 


#5 1 


ASL 


A \ 


TAX 




LDA 


RTCLa<+2i 


ROR 


A 



A.N.A.L.O.G. COMPUTING 



PAGE 83 



;inask on the distortion 

igenerate the tictoc sound 

jget shuf-fle volume 

;i'f <8 we produce no sound 

jdecrement volume value 

lisask on the distortion 

igenerate the shuf-fle noise 

iget shot -frequency 

; increment shot frequency 

;do it again 

;and one last time 

ichange -frequency (lower) 

;is rabbit dying 

|No. continue 

;Yes. 2 second die periwl 

;change rabbit colors 

lagain 

;get number 

•'*? 

1*8 

;u5e as -freauency 

jget distortion 

jmake sound 

;exit vertical blank 

jcheck push wall up 

jpush up? No. 

jdecrement push up counter 

;get top wall location 

iconpare with top of screen 

;at top? Yes. 

;move wall up 

;check push wall down 

;push down? No. 

jdecrement push down counter 

;get botton wall location 

icompare botton of screen 

lat bottom? Yes. 

;move wall down 

fcheck push wall left 

jpush left? No. 

;decrenent push left counter 

;get left wall position 

;niove left wall player 

;check for left wall limit 

;at limit? Yes. 

jmoue wall left 

;check push wall right 

ipush right? No. 

{decrement push right counter 

;Qet right wall position 

ifflove right wall player 

:check ior right wall limit 

jat limit? Yes. 

;move wall right 

;get a zero 

|pd<e out atract mode 

jzero rabbit X increment 

jzero rabbit Y increment 

;get Joystick value 

;at center position? 

lYes. skip code 

;get real time clock L^ 

;at 1/7.5 second mark? 

]Ho. skip code 

;get shuffle frequency 

jset frequency register 

;get voluie value 

;set shuffle volume 

jget joystick value 

;set carry fw subtract 

(values 5-15 only 

;5-15 now 9,2,4,... 

;use for Index 

t real tine clock LS8 

ivide by 2 





ROR 


A 




ROR 


A 




ROR 


A 




LDA 


PK1,X 




BCC 


PIClk 




LDA 


PK2,X 


PIChWL 


STA 


PIC 




LDA 


PK1+1,X 




BCC 


PIQVH 




LDA 


PK2+1 ,X 


PlCtf^ 


STA 


PIC+1 




LDX 


#3 


CHKSTK 


LSR 


STICK8 




BC5 


CHKNXT 




LDA 


STBLX,X 




BEQ 


CHK8 




STA 


XTEHP 


CHK8 


LDA 


STBLY.X 




BEQ 


CHKNXT 




STA 


YTEHP 


CHKNXT 


OEX 






BPL 


CHKSTK 




LDA 


P8PLT 




CMP 


«$ec 




BNE 


NOSQUE 




DEC 


RNUM 




DEC 


LIVES 




INC 


DIESU 


NOSQUE 


M) 


#$84 




BEQ 


BMPRT 




INC 


IWRX 




LDA 


#8 




STA 


XTEMP 


BHPRT 


LDA 


P8PLT 




AND 


#$88 




BEQ 


BMPUP 




DEC 


HARX 




LDA 


#8 




STA 


XTEMP 


BMPUP 


CLC 






LDA 


BYLOC 




ADC 


#4 




LSR 


A 




CMP 


HARY 




BCC 


BHPDN 




DEC 


RNUM 




DEC 


LIVES 




INC 


DIESU 


BMPDN 


LDA 


HARY 




ADC 


#16 




ASL 


A 




CMP 


BYLOC+1 




BCC 


NOBMP 




DEC 


RNUM 




DEC 


LIMES 




INC 


DIESU 


NOBMP 


CLC 






LDA 


WRX 




ADC 


XTEMP 




STA 


l«)RX 




STA 


W0SP8 




CLC 






LDA 


HARY 




ADC 


YTEMP 




STA 


HARY 




TAX 






LDY 


#8 


MOUHAI? 


LDA 


(P1C),Y 




STA 


PLR8,X 




INX 






INY 






CPY 


#14 




BNE 


HOVIttR 




LDA 


STRIG8 




CMP 


STRK? 




STA 


STRISF 




BCS 


NOFIRE 



■jdivide by 4 
(■divide by 8 

; carry set/reset at .13 sec 
;get rabbit picture LSB 
jother pic at .13 sec? No. 
;get alternate picture LSB 
I store LSB of pic address 
;get rabbit picture MSB 
lother pic at .13 sec? No. 
;get alternate picture MSB 
I store MSB of pic address 
jcount 3 downto 6 
;shift bit into carry 
jcorrect direction? No. 
;check X movement direction 
imoveraent allowed? No. 
;store X movement value 
(Check Y movement direction 
(movement allowed? No. 
(Store Y movement value 
(do next stick position 
(done yef No. 
(get player 8 collision 
(left/right squeze? 
(No. Check indvdual walls 
(decrement I ives display 
(decrement lines ccwnter 
(the rabbit has died switch 
(Check left wall collision 
(hit left wall? No. 
(Yes. Move rabbit to right 
(get zero value 
(stop rabbit X movement 
(get player 8 collision 
(Check right wall collision 
(hit right wall? No. 
(Yes. Move rabbit to left 
(get zero value 
(Stop rabbit X movement 
(dear carry for add 
(top wall Y location 
(Offset by 4 
(divide by 2 

(compare rabbit Y location 
(hit top wall? No. 
(decrement lives display 
(decrement lines counter 
(the rabbit has died switch 
(get rabbit Y location 
(Offset by 18 
(multiply by 2 
(compare botton wall Y 
(hit bottom wall? No. 
(decrement I ives display 
(decrement lines counter 
(the rabbit has died switch 
(dear carry for add 
(get rabbit X position 
(add X increownt 
(Save new rabbit X position 
(position rabbit player 8 
(dear carry for add 
(get rabbit Y position 
(add Y increment 
(save new rabbit Y position 
(use position as index 
(initialize picture counter 
(get rabbit picture byte 
(stwe in player 8 area 
(increment player pointer 
(increment picture pointer 
(Check for end of picture 
(at end? No. 
(get trigger value 
(compare with trigger flag 
(save new trigger tlag 
(Shot fired? No. 





This disk and program 
was destroyed by a simple spill of milk. 

NOW YOU CAN PREVENT A TOTAL LOSS 

The Replica 1+1 Backup and Utilities Systems Package makes it 
possible for the user to build a complete reserve library to replace a 
damaged or faulty disk when necessary. 

PROGRAM FEATURES 

DISK BACKUP: Copies the sections of the disk which contain data, and 
also permits read and write without verify, speeding up the backup 
process considerably. Copies 'bad sectors' with ease. UTILITIES 
PACKAGE: Scans any ATARI disk, providing the user with information 
as to which sectors contain data, whichareempty and which are 'bad'. 
Includes a sector editor which allows the user to see and modify data 
within a sector. Disassembles a sector into machine language op 
codes. Searches for a series of bytes or a string within a section of a 
disk. Includes a custom format scan and patch analysis enabling the 
user to backup any presently available* ATARI computer disk. And 
much more. . . . 

To receive the Replica 1 +1 package and documentation fill out the 
coupon below and send $50 to: 



NUDMEHl SOFTWARE 

495 Old York Road Suite 425 

Jenkintown, Pa. 19046 

Visa and Mastercard Phone Orders: 215-635-2722 
NAME 



ADDRESS_ 
CITY 



. STATE_ 



ZIP. 



D 
D 

D 



MY CHECK FOR $50 IS ENCLOSED 

BILL BY VISA # 

EXPIRATION DATE 



BILL MY MASTERCARD #. 
EXPIRATION DATE 



CARDHOLDER'S SIGNATURE 

'As of 8/15/82. Subsequent updates will become available at a nominal fee; 
Please Note: It may be necessary to adjust your drive speed when backing up certain disks, 

THE REPLICA 1 +1 IS NOT INTENDED FOR THE ILLEGAL 
DUPLICATION OF COPYRIGHTED MATERIALS 



ATARI is a trademark of ATARI, INC. 
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LDA 
(«A 
GNE 
fNC 
BNE 
FIREGN LM 
STA 
LM 
STA 
IfC 
LDA 

m) 

TAX 
LDA 
ASL 
STA 
LDA 
AS. 
STA 
CLC 
LDA 
AiX: 
STA 
LDA 
ADC 
STA 

NOFIRE LDA 
TAX 

EIMSES STA 
INX 
BPL 
LDX 

PLOTS LDA 
ORA 
BED 
LDA 
CLC 
ADC 
STA 
TAY 
ASL 
ADC 
CHP 
BCC 
JSR 
ADC 
STA 



HHTP SBC 
CW 
BCS 
JSR 
ADC 
STA 

PLOTNH LDA 



NHPF 



MHPF8 



STA 
LDA 
ORA 
STA 
LDA 
LDY 
ROR 
BCC 
JMP 

m 

CPY 

B^e 

CLC 
LDA 
ADC 
STA 
STA 
CMP 
BCC 
JSR 
ADC 



XTB1P 

YTEMP 

FIREEN 

STRIGF 

NOFIRE 

M48 

FREQ3 

«$84 

AUDC3 

aWTS 

SHOTS 

*3 

XTEMP 

A 

SINCX,X 

YTEMP 

A 

SlNCYjX 

WRX 

i3 

SHOTX,X 

HARY 

«8 

aWTYjX 



MISL,X 

EfMSES 

#3 

SlNCXjX 

SINCY.X 

NOPLOt 

SHOTY,X 

SINCYjX 
SHOTY,X 

A 

BYLOC+1 

Hinp 

ZINCXY 
WINC+1 
UINCH 
PLOThW 

mi 

BYLK 
PLOTNH 
ZINCXY 
UINC 
UINC 

MISL.Y ; 
MlSMa<,X! 
M1SL,Y ■ 
MISL+1 ,Y 
MISMSK.X 
MISL+1, Y 
H8PF,X 

m 

A 

h«PF8 

MHIT 

«4 

mPF 

SHOTX,X 

SINCX.X 

»«)TX,X 

HPOSMe.X 

BXLK+t 

HITLF 

ZINCXY 

UINCt3 



rabbit X increiunt 
OR rabbit Y increnent 
rabbit stationary? No. 
s«t trigyr flag to 1 
skip fire routine 
initialize frequency 
zero audio freo 3 
shot Moluw + aistortion 
enable uoluse 3 
increnent shot pointer 
get shot pointer 
make it 8-3 only 
use pointer for index 
get rabbit X increment 
make shot twice as fast 
set laissile X increment 
get rabbit Y increnent 
■take shot twice as fast 
set missile Y increment 
clear carry for add 
get rabbit X position 
move to center X of rabbit 
shot initial X position 
^t rabbit Y position 
moue to center Y of rabbit 
shot initial Y position 
zero accwiulator 
zero X index 
zero all missiles 
next nissile byte 
done? No. 
coint 3 downto 8 
get missile X increment 
OR missile Y increment 
any movement? No. 
missile Y positiwi 
clear carry for add 
add Y increment 
store new Y position 
Y position now index 
multiply by 2 
offset for compare 
compare with bottom wall 
hit bottom wall? No. 
zero missile increments 
add 8 to wall increment 
new bottom wall incremnt 
continue 

offset for bottom side 
compare with top wall 
hit top wall? No. 
zero missile increments 
add 8 to wall increment 
new iop wall increment 
get missile byte 
OR missile mask 
store new byte 
get next missile byte 
OR missile mask 
store new next byte 
missile/playf ield collision 
init Y register 
collision? 
No. No. No. 
Yes. Yes. Yes. 
try next bit 
any more bi ts? 
Certainly! Yuk. Yuk. 
dear carry for add 
get nissile X position 
add X increment 
store new X position 
position missile 
compare missile with wall 
hit right wall? No. 
zero missile increments 
add 8 to wall increment 



STA 



HITLF 8K 
Off 
BCS 
JSR 
ADC 
STA 

MPLOT DEX 
BMI 
JMP 

NOPLl LDX 
LDA 

CHmiS ORA 
ORA 
DEX 
BPL 
CMP 
BhE 
STA 

NOSSND LDY 

MISHIT LSR 
BCC 
JSR 
LDA 

?m 

J^ 
PLA 
TAY 
BEQ 
SCORER LDX 
SCI INC 
LDA 
CMP 
BNE 
LDA 
STA 
DEX 
BPL 
DEY 
Bt€ 
JMP 



UINC+3 ;newwall increment 
NOPLOT jcontinue 



SCY 

sex 

mi 
VBX 
MHIT 



INY 
CPY 
6^£ 
STA 
JHP 

T»* 
PHA 
JSR 
iSR 
PIA 
TAX 
JMP 



BXLOC 

NOPLOT 

ZINCXY 

WINC+2 

UINC42 

NOPLl 
PLOTS 

13 
«8 

SINCX.X 
SINCYjX 

CHKMIS 
«8 

NOSSND 
AUDC3 

He 

P8PR 

mi 

EIMNIM 
VTBL.Y 

POThftH 



sex 

«3 

SNUH,X 

SNUH.X 

«'8'+4A8 
SNIIH,X 

Kl 

SCORER 
UBX 



offset for right side 
comare with feft wall 
hit left wall? No. 
zero missile increments 
add 8 to wall increment 
new wall increment 
next nissile 
missiles done? Yes. 
continue loop 

set up pointer 

zero accumulator 

ffl? in X increments 

CK in Y increments 

decrement pointer 

at end? No. 

check shot increments 

any increments? Yes. 

end shot sound 

initialize Y index 

shift collision to carry 

col I i si on w/number? No. 

erase the nuiber 

^t value of ntmber 

save on stack 

put out a new number 

get old nuiber 

use as counter value 

was it zero? Yes. 

point to scwe low digit 

increment digit 

get digit 

past ATASCIL '9'+color? 

m. continue 

reset digit 

change score display 

point to next digit 

score rolled ouer^ No. 

decrement value 

scoring done? No. 

exit routine 



113 

MISHIT 

HITCLR 



ERANIW 
PUTNtW 



NOPLOT 



;check next color digit 

;done 8-2 yet? 

;No. continue 

;clear collision registers 

jexit deferred vertical blank 

save X register 

on stack 

erase ninber hit and 

put a new one on screen 

pull X register 

from stack 

continue on 



Coononly used subroutines 



Clear missile display area 



ZINCXY 



LDA 
STA 
STA 
CLC 
LDA 
RTS 



m 

SINCX,X 
SINCY,X 

m 



get zero value 

zero missile X increment 

zero missile Y increment 

clear carry for add 

get value for add 

we return to the program 



; Clear the gaiw playfield 

CLSCRN LDX 11288 ;set 8-199 bytes 

LDA #8 ;to zero 

CL8 STA DISP-l,X|store in display 

DEX jcount down 
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BE CL8 ;past zero yet? No. 

RTS ;return to prolan 

Put randcn ntnbtr fron 8-9 m screen at 
a randan location %-l99 



PNe 



PUTNUM LDX 
CFX 
BCS 
LM 
BNE 
LDA 
fi& 
CMP 
BCS 
STA 
0I«^ 
STA 
7XA 
STA 
RTS 



EMNUH 



lUNDOM 

«2ee 

PUTNUi 
OISP,X 

puMi 

RAtflXn 
»IF 

tl8 

PN8 

VTH.,Y 

CTBL.Y 

D1SP,X 

ATH.,Y 



get randon nunber 

IS ninber < 288? 

No. try another 

see if space is occupied 

Yes. try again 

f!t another randon nuidwr 
init it to 8-15 
is nui^r < 18? 
No. try another 
save nunber 
OR uith coin* 
put nunber on screen 
nove screen o-f-fset to A 
sage screen of-fset 
end of routine 



Erase nunber fron screen 



HARDN2 


DB 




DB 




DB 




DB 




DB 




DB 


HARUPl 


DB 




DB 




DB 




DB 




DB 




DB 


HARUP2 


DB 




DB 



LDA 
LDX 
STA 
LDA 
AND 
OfiA 
STA 
LDA 
STA 
RTS 



18 

ATBL,Y 

DISP.X 

RANMH 

HIF 

M18 

AUDF4 

m 

NSOUND 



get zero -for blank 

get i position on screen 

blank nuiber on screen 

get ranckn number 

Bask off high bits 

nake it »i8-$lF 

use as sound frequency 

initialize- 

volune counter 

end of rcHitine 



Prolan tables and constants 



HISHSK DB 
DB 
DB 
DB 

HARLFl DB 
DB 
DB 
DB 
DB 
OB 

HmF2 DB 
DB 
DB 
DB 
OB 
DB 

mRRTi DB 



DB 
IS 
DB 

HARRT2 DB 
DB 



06 
DB 

HARFRl DB 
DB 
DB 
DB 
DB 
DB 

HARFR2 DB 
DB 



«83 
«8C 
«38 

m 



;nissile 8 nask 

;nissi1e 1 nask 

;nissile 2 mask 

jnissile 3 nask 



;left view t2 



;right vieu II 



8,8 ;left view II 

$I2,$8A 

i3C,$74 

$3C,$1C 

iIE,*S 

»3F,1»7E 

8,8 

m,im 

»3C,$74 

«C,*1C 

«1E,»X 

»3E,«F7 

8,8 

K48,$S8 

$3C,i2E 

$3C,*38 

i78,$7C 

$FC,«7E 

8.8 jright view 12 

4De,$56 

i3C,t2E 

$3C,$38 

$78,*7C 

$7C,«EF 

6,8 

$42, $24 

«^,$14 

«3C,$18 

*3C,*7E 

$7E,«E7 

6,8 

$42 ,$24 



;doM) view II 



jdown view 12 



;up view II 



;up view 12 



DB $3C,$18 

DB *a:,$7E 

DB $7E,«E7 

HAHMi DB 8,8 

DB $44 ,$24 

DB $3C,$14 

DB $3C,$18 

DB $X,$7E 

$FE,$87 
8,8 

$22 ,$24 
$X,$28 
$3C,$18 
$X,$7E 
$7F,$E8 
8,8 
$44 ,$24 

$a;,$x 

$3C,$18 
*3C,i66 
$FE,$87 
6,8 

$22,$24 
DB $3C,$3C 
DB $3Ci$18 
DB %^,*66 
DB $7F,$E8 
DB 8,8 

PKl DU mRRTl 

DU HARRTl 

DU HARRTl 

DU e 

DU »)RLF1 

DU HARLFl 

DU IttRLFl 

DU e 

DU WRDNl 

DU HARIPI 

DU HARFRl 

PK2 DU wmi 

DU HARRT2 

DU HARRT2 

DU 8 

DU HARLF2 

DU (ttRLF2 

DU H^F2 

DU 8 

DU HARDN2 

DU HARUP2 

DU HARFR2 



CTBL DB $16,$S8 ;color offset table 

DB $98 

METRO DB 38,41 ;tictoc tones 

STBLX DB $81 ,$FF {joystick X increnents 

DB $88 $88 

STBLY DB $88j$e8 {Joystick Y increments 

DB $81,$FF 



;rabbit pictures set 1 



jrat^it pictures set 2 



Variable Storage Area 



jfront view II 



;fr(mt view 12 



(MRX 
HARY 
BYLOC 
BXLOC 
UOLl 
V0L2 
FREQ3 
NSOUND DS 
TICTOC DS 
TIM2Sr DS 
UINC DS 
STRI6F DS 



DS 
DS 
DS 
DS 
DS 
DS 
DS 



I jHarvey's X locatin 

1 jHarvey's Y location 

2 jhorizontal wall Y locations 
2 {vertical wall X locations 

1 {tictoc voiune 

I {Shuffle volume 

1 {Shot frequency 

1 {pick nuBcer up sound 

1 {tictoc sound counter 

1 {wall speed timer 

4 {wall mover counters 

1 {trigger compare register 
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XTEHP 


DS 


1 


YTEMP 


DS 


1 


P8PLT 


DS 


1 


PBPFT 


OS 


1 


VTBL 


DS 


3 


ATBL 


DS 


3 


SHOTS 


DS 


1 


LWES 


DS 


1 


DIESW 


DS 


1 


SHOTX 


DS 


A 


SHOTY 


DS 


4 


SINCX 


DS 


A 


SINCY 


DS 


A 


DISP 


OS 


280 
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teraporary variable 
temporary variable 
player 6 collision shadOM 
PL to PF collision shadow 
value o-f i's on screen 
screen o-f-fset to D's 
shot enable counter 
nimber o-f lives le-ft 
rabbit dying switch 
missile X location 
missile Y location 
missile X increment 
missile Y increment 
screen display area 



END 



HARVEY 



BASIC PROGRAM 

100 REN HARVEY HALLBANGER 

lie REN DISK NAKER PROGRAN 

128 REN 

130 DIN PR0G$(160e] :PNTR=1 

140 LINE=990:TRAP 220 

150 LIHE=LIHE+10:FOR C0UNT=1 TO 15 

168 READ BYTE :PROG$CPNTR}=CHR$ (BYTE) 

170 PIITR=PMTR+i:T0TAL=TOTAL+BVTE 

188 HEKT COUNT:? "LIME :";LIHE 

190 READ CHECKSUN 

200 IF CHECK5UN=T0TAL THEN 150 

210 ? "BAD CHECKSUM: LIME ";LINE:ST0P 

228 IF PEEKC195J=6 THEM 240 

230 ? "BAD DATA: LIME "JLIME:ST0P 

240 OPEM ttl,8,e,"D:AUT0RUM.SYS" 

250 PRINT ttl;PR0G$; :EMD 

999 REM 

1080 DATA 255,255,0,52,216,57,76,71,52 

,112,112,112,112,71,7,1560 

1010 DATA 58,7,7,7,7,7,7,7,7,7,112,112 

70 27 52 2054 
i026 DATA '65, 3, 52, 242, 225, 226, 226, 233, 
244,243,218,211,192,243,227,4904 
1030 DATA 239,242,229,218,208,208,208, 
208,103,97,109,101,0,0,111,7185 
1040 DATA 118,101,114,128,112,114,101, 
115,115,0,0,115,116,97,114,8645 
1050 DATA 116,128,216,32,101,228,169,2 
11, 141, 35, 52, 169 , 3, 141 , 245 , 10632 
1060 DATA 57,169,208,141,43,52,141,44, 
52,141,45,52,141,46,52,12016 
1070 DATA 169,60,141,228,57,141,26,2,3 
2,229,56,160,2,32,231,13573 
1088 DATA 56,136,16,250,169,3,141,48,2 
,169,52,141,49,2,169,14976 
1090 DATA 4,141,111,2,169,40,141,219,5 
7,169,196,141,220,57,169,16812 
1100 DATA 60,141,221,57,141,2,208,169, 
184,141,222,57,141,3,208,18767 
1110 DATA 169,122,141,217,57,169,55,14 
1, 218, 57,169, 46, 141, 47, 2, 20518 
1120 DATA 169,3,141,29,208,169,48,141, 
7,212,169,150,141,198,2,22305 
1130 DATA 169,72,141,199,2,169,24,141, 
192,2,169,152,141,193,2,24073 
1140 DATA 169,52,141,194,2,169,196,141 
,195,2,169,1,141,233,57,25935 
1150 DATA 162,53,160,204,169,7,32,92,2 
28,169,137,141,38,2,169,27698 
1160 DATA 53,141,39,2,169,153,141,48,2 
,169,53,141,41,2,169,29013 
1170 DATA 1.141,25,2,169,0,141,30,208, 
141,246,57,141,227,57,30599 
1180 DATA 141,223,57,141,224,57,141,14 
,210, 162, 3, 157, 229, 57, 157, 32572 
1190 DATA 247,57,157,251,57,157,255,57 
,157,3,58,202,16,238,170,34654 
1200 DATA 157,128,49,157,0,58,232,208, 
247,169,255,157,0,51,232,36746 
1210 DATA 208,250,232,138,41,1,170,189 
,219,57,74,8,205,11,212,38761 
1220 DATA 208,251,141,10,212,40,144,3, 
141,10,212,173,10,210,41,40567 
1230 DATA 246, 141, 26, 2liG, 1^0,10,169,0, 
157,15,208,141,10,212,173,42443 



1240 DATA 10,210,41,246,141,26,208,136 

,208,237,173,200,2,141,26,44448 

1250 DATA 208,173,245,57,240,8,173,246 

.57,16.3.76.99,52,173,46274 

1260 DATA 31,208,41,1,288,177,76,71,52 

,173,228,57,201,2,240,48840 

1278 DATA 3,206,228,57,169,1,141,25,2, 

96,173,228,57,141,26,49593 

1288 DATA 2,238,219,57,286,228,57,238, 

221,57,173,221,57,141,2,51702 

1298 DATA 208,206,222,57,173,222,57,14 

1,3,208,238,227,57,173,227,54121 

1300 DATA 57,41,1,170,189,207,57,141,0 

,210,169,8,141,223,57,55792 

1310 DATA 96,173,246,57,208,60,173,245 

,57,208,55,32,220,56,162,57840 

1320 DATA 0,142,1,210,142,3,210,142,5, 

210,142,7,210,142,24,59430 

1330 DATA 2,142,25,2,142,26,2,189,47,5 

2,48,7,157,92,58,60421 

1340 DATA 232,76,240,53,162,0,189,58,5 

2,48,7,157,151,58,232,62136 

1350 DATA 76,254,53,76,189,56,173,12,2 

08,141,236,57,173,4,208,64052 

1368 DATA 141,237,57,173,226,57,48,9,2 

06,226,57,74,9,160,141,65873 

1370 DATA 7,210,173,223,57,48,8,206,22 

3,57,9,192,141,1,210,67638 

1380 DATA 173,224,57,48,8,206,224,57,9 

,128,141,3,210,173,225,69524 

1390 DATA 57,238,225,57,238,225,57,238 

,225,57,141,4,210,173,246,71915 

1408 DATA 57,240,26,238,246,57,238,192 

,2,238,192,2,173,192,2,74010 

1410 DATA 10,10,10,141,2,210,169,136,1 

41,3,210,76,189,56,173,75546 

1420 DATA 22^,57,240,13,206,229,57,173 

,219,57,201,28,240,3,206,77704 

1430 DATA 219,57,173,230,57,240,13,206 

,230,57,173,220,57,201,204,80041 

1440 DATA 248,3,238,220,57,173,231,57, 

240,16,205,231,57,173,221,82404 

1458 DATA 57,141,2,288,281,39,248,3,28 

6,221,57,173,232,57,240,84481 

1460 DATA 16,206,232,57,173,222,57,141 

,3,288,281,288,240,3,238,86686 

1470 DATA 222,57,169,0,133,77,141,234, 

57,141,235,57,173,120,2,88504 

1480 DATA 201,15,240,16,165,20,41,7,20 

8,10,169,16,141,2,210,89965 

1490 DATA 169,4,141,224,57,173,120,2,5 

6,233,5,10,170,165,20,91514 

1588 DATA 186,106,106,106,189,160,57,1 

44,3,189,182,57,133,128,189,93369 

1518 DATA 161,57,144,3,189,183,57,133, 

129, 162, 3, 78, 120, 2, 176, 94966 

1520 DATA 16,189,209,57,240,3,141,234, 

57,189,213,57,240,3,141,96955 

1530 DATA 235,57,202,16,232,173,236,57 

,201,12,208,9,206,35,52,98886 

1548 DATA 286,245,57,238,246,57,41,4,2 

40,8,238,217,57,169,0,100909 

1550 DATA 141,234,57,173,236,57,41,8,2 

40,8,206,217,57,169,0,102753 

1560 DATA 141,234,57,24,173,219,57,105 

,4,74,205,218,57,144,9,104474 

1570 DATA 206,35,52,206,245,57,238,246 

,57,173,218,57,105,10,10,106389 

1580 DATA 205,220,57,144,9,206,35,52,2 

86,245,57,238,246,57,24,108390 

1590 DATA 173,217,57,109,234,57,141,21 

7,57,141,0,288,24,173,218,110416 

1688 DATA 57,109,235,57,141,218,57,170 

,160,0,177,128,157,0,50,112132 

1610 DATA 232,288,192,14,208,245,173,1 

32,2,205,233,57,141,233,57,114456 

1620 DATA 176,63,173,234,57,13,235,57, 

208,5,238,233,57,208,50,116463 

1638 DATA 169,64,141,225,57,169,4,141, 

5,210,238,244,57,173,244,118604 

1640 DATA 57,41,3,170,173,234,57,10,15 

7,255,57,173,235,57,10,120293 

1650 DATA 157,3,58,24,173,217,57,105,3 

,157,247,57,173,218,57,121999 

1668 DATA 185,8,157,251,57,169,0,170,1 

57,128,49,232,16,250,162,123910 

1670 DATA 3,189,255,57,29,3,58,240,127 

,189,251,57,24,125,3,125520 
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1689 DfiTft 58,157,251,57,168,18,105,2,2 
85,229,57,144,12,32,288,127206 

1690 0ftT« 56,189,230,57,141,238,57,76, 
31,56,233,12,285,219,57,128975 

1780 DflTft 176,9,32,208,56,189,229,57,1 

41,229,57,185,128,49,29,138669 

1718 0flT« 34,57,153,128,49,185,129,49, 

29,34,57,153,129,49,189,132093 

1720 DATA 0,208,160,8,106,144,3,76,195 

,56,200,192,4,208,245,133890 

1730 DATA 24,189,247,57,125,255,57,157 

,247,57, 157, 4, 288, 205, 222 , 136181 

1740 DATA 57,144,12,32,208,56,109,232, 

57,141,232,57,76,111,56,137681 

1758 DATA 233,6,285,221,57,176,9,32,28 

8,56,189,231,57,141,231,139653 

1760 DATA 57,282,48,3,76,232,55,162,3, 

169,8,29,255,57,29,141838 

1770 DATA 3,58,282,16,247,281,0,288,3, 

141,5,210,168,0,78,142562 

1780 DATA 237,57,144,40,32,10,57,185,2 

38,57,72,32,231,56,104,144114 

1790 DATA 168,240,23,162,3,254,43,52,1 

89,43,52,201,218,208,8,145978 

1800 DATA 169,208,157,43,52,202,16,238 

,136,298,233,76,189,56,208,148161 

1810 DATA 192,3,208,206,141,30,208,76, 

98,228,138,72,32,19,57,149860 

1828 DATA 32,231,56,104,170,76,111,56, 

169,0,157,255,57,157,3,151494 

1830 DATA 58,24,169,8,96,162,200,169,0 

,157,6,58,202,208,250,153261 

1840 DATA 96,174,10,210,224,200,176,24 

9,189,7,58,208,244,173,10,155489 

1850 DATA 210,41,15,201,10,176,247,153 

,238,57,25,204,57,157,7,157287 

1860 DATA 58,138,153,241,57,96,169,8,1 

90,241,57,157,7,58,173,159082 

1870 DATA 18,210,41,31,9,16,141,6,218, 

169,30,141,226,57,96,168475 

1880 DATA 3,12,48,192,0,0,18,18,68,116 

,60,28,30,62,63,161177 

1898 DATA 126,0,0,11,10,60,116,60,28,3 

0,62,62,247,0,8,161989 

1980 DATA 72,88,68,46,68,56,120,124,25 

2,126,8,0,208,89,69,163333 

1910 DATA 46,60,56,120,124,124,239,0,0 

,66,36,60,20,60,24,164368 

1920 DATA 60,126,126,231,0,8,66,36,68, 



40,68,24,68,126,126,165509 

1930 DATA 231,0,8,68,36,60,20,60,24,60 

,126,254,7,0,0,166455 

1940 DATA 34,36,68,40,60,24,60,126,127 

,224,0,0,68,36,60,167410 

1950 DATA 60,60,24,68,182,254,7,0,8,34 

,36,60,60,60,24,168251 

1960 DATA 60,102,127,224,0,8,62,57,62, 

57,62,57,0,0,38,169159 

1970 DATA 57,38,57,38,57,0,0,110,57,13 

4,57,86,57,74,57,170038 

1980 DATA 74,57,74,57,0,0,50,57,58,57, 

58,57,0,0,122,170743 

1990 DATA 57,146,57,98,57,16,88,144,38 

,41,1,255,0,9,0,171733 

2080 DATA 0,1,255,226,2,227,2,0,52,0,0 

,6,0,0,0,172498 



109 REM HARUEY HALLBANGER MODS 

119 REM CASSETTE MAKER PROGRAM 

120 REM 

240 8PEM «1,8,128,"C:" 

241 PR0G$C1,1)=CHR$(0} 

242 PR0GSf2,2J=CHRSC12) 

243 PR0G5C3,3)=CHR$(25e) 

244 PR0G$C4,4)=CHRS(51) 



D:CHECK DATA (see p. 29) 

108 DATA 817,932,302,586,656,712,870,6 

69,51,479,193,91,319,452,924,8853 

250 DATA 285,231,567,689,383,362,67,46 

9, 843, 631, 894, 319, 256, 274, 52, 6242 

1130 DATA 953,210,109,618,739,238,199, 

149,911,918,186,323,41,918,771,7283 

1280 DATA 935,511,995,351,627,385,48,1 

05,175,753,90,209,952,23,281,6448 

1430 DATA 311,380,58,163,971,712,689,4 

87,32,958,188,870,940,957,259,7887 

1580 DATA 158,247,25,309,36,287,896,23 

6,138,727,30,33,86,84,918,4130 

1730 DATA 267,19,72,666,735,10,970,383 

,295,90,71,422,156,969,659,5704 

1880 DATA 368,413,755,735,716,200,469, 

421,256,643,209,559,680,6424 



PRODUCT REVIEW: 
MASTER MEMORY MAP 

Educational Software, Inc. 
4565 Cherryvale Ave. 
Soquel, CA 95073 
(408) 476-4901 
$6.95 List 



by Tom Hudson 



Last issue's programmer aids review failed to 
mention one of the better aids available for the 
ATARI computers, the Master Memory Map (or 
MMM) from Educational Software, Inc. In order to 
correct this oversight, this review will cover the 
contents of the MMM separately. 

The Master Memory Map is a 30-page 
compilation of over 300 memory locations in the 
ATARI 400/800 computer systems. Each location is 
listed with its address in both decimal and 
hexadecimal. Any shadow locations (operating 
system holding areas) are also given in decimal. A 



description of each location is given, sometimes with 
a sample BASIC statement for the user to try, making 
understanding much easier. The locations most 
important for beginning users are marked in 
boldface type for easy reference. 

Memory locations are grouped into several 
sections, including input/output control blocks, 
system timers, controllers, color locations, disk I/O, 
player-missile graphics registers, audio controls, 
floating point package entry points, device handlers 
and O.S. jump instruction addresses. 

The Master Memory Map has more than just 
memory locations. There are sections telling how to 
PEEK and POKE both single — and double-byte 
values, hints on speeding up BASIC, lists of bugs in 
ATARI BASIC and the ATARI operating system, 
GTIA graphics usage, and hex/decimal conversion. 

Each person's needs are different, but the average 
ATARI user who would like to know more about the 
inner workings of the 400/800 systems can get 
information on hundreds of important memory 
locations and their functions from the Master 
Memory Map. D 
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A TRIP TO THE NIMITZ 



by Jon Bell 



One of the privileges of working on an 
internationally-distributed magazine is reading 
interesting mail. We are introduced to computer 
programmers and ATARI enthusiasts from all over 
the world from our letters. When our mail arrives, 
the first pieces to get snatched up are those letters 
bearing interesting postmarks, stamps or return 
addresses. The scene bears resemblance to sharks 
engaging in some sort of paper feeding frenzy. As a 
corollary to receiving interesting mail, we also get to 
meet the interesting people who wrote the letters. 

Last spring, I was going through the mail when a 
return address label caught my eye. It read: LCDR 
H.R. MOORE II, VF-41, USS NIMITZ (CVN-68) 
and it gave a New York RO. Box through which the 
ship could be reached. For those not acquainted with 
military classifications, the Nimitz is one of our most 
modern nuclear aircraft carriers. She carries 100 
planes and over 5000 men. Rich Moore is a 
Lieutenant Commander with VF-41, the "Black 
Aces" or "Fighting 41" squadron. Readers may 
recall in August of 1981 that two American F-14 
Tomcat fighter planes shot down two Libyan jets 
while the Nimitz (and the rest of the Sixth Fleet) were 
engaged in naval operations in the Gulf of Sidra. 
Those two F'14's were from Commander Moore's 
squadron. 

Well, to shorten an ever-lengthening story, I 
struck up a correspondence with Rich Moore, 
and ... uh .. .asked if some members of 
A.N.A.L.O.G. could take a tour of the Nimitz. 



No problem. 

(Big digression here. Everyone who works at 
A.N.A.L.O.G. likes: science fiction, soundtrack 
music, video games, fast cars, high technology; 
especially military or space-related, and traveling to 
far-off places to do unusual things at almost an 
instant's notice. When the opportunity arises to 
combine these interests there's no way we can pass it 
up.) 

So, on October 21st, Lee Pappas, Ed Miarecki, 
Tom Hudson and I went down to Norfolk, Virginia, 
where the Nimitz was in port. (It's also the largest 
naval base in the world, and home to Newport News 
Shipyard and Oceana Naval Air Station. ) We went 
in two cars, blasting the theme music from The 
Final Countdown over our car stereos, surviving 
on junk food and adrenaline as we drove to a once- 
in-a-lifetime opportunity. 

The ship was unbelievable. Over a thousand feet 
long, standing on its flight deck was like being on a 
large parking lot — over 50 feet off the surface of the 
water. 

We toured the ship. We ate lunch in the officer's 
dining room. And we talked to Commander Moore 
about the ATARI home computer. 

In a small cabin aboard the billion-dollar aircraft 
carrier sits an ATARI 800. It is not the only ATARI 
aboard the ship. This one, however is being used to 
keep track of maintenance schedules. Eventually it 
will help keep track of weapons systems inventory 
and other items. This prosaic device sits aboard a 




TKe nuclear-powered aircraft carrier NIMITZ sits in port at Norfolk, Virginia. 



ship that is more powerful then many small 
countries. 

Aha! you say. Now you realize why I wrote this 
editorial. I wasn't simply gloating over getting to take 
a fascinating trip that few civilians get to experience. 
There had to be something to do with ATARI in 
this column. Yet, you may ask, what does the 
presence of an ATARI home computer aboard an 
advanced nuclear-powered aircraft carrier ultimately 
mean? 

The key, I think, lies in the word "prosaic" in the 
previous paragraph. I did not mean that an ATARI 
800 is dull, but commonplace. I think this is a good 
sign. Many people are still afraid of computers. I can't 
expect any member of the United States Navy to be 
awed by an ATARI home computer, but I can expect 
the average American to appreciate the value, the 
commonplace usefulness of a home computer, as it is 
used today in almost any setting. 

Even aboard a billion-dollar aircraft carrier like 
the Nimitz. D 



ABOUT THE COVER. . . 

Instead of depictinp some sort of computerized Santa Claus for this 
issue's cover, we opted for something a little different for our Christmas 
issue. A number of computer maf^azine artists have drawn vessels similar 
to the one on our cover, but we decided to photoj^jraph the real thing — 
the definitive ATARl-logo spaceship. 

The ship was adapted from a model of the SR-71 spy plane. The land- 
scape was constructed from styrofoam, sculpted to look like the scarred 
surface of an asteroid. The asteroid base buildings and launch pad were 
constructed from various model kits and sheet styrene. The gantry was 
scratch-built from balsa, courtesy of Ed Miarecki. As with all of the 
covers since issue no. 5, multiple exposures were the key in providing the 
optical effects. The master shot of the landscape was shot with a black 
background. The nebula was then rear-projected onto an acetate sheet 
hung behind the miniature. This was the second exposure. With the 
miniature not illuminated, the silhouettes of the foreground objects 
served as their own "hold-out" mattes for the background. The lights on 
the launch pad and buildings were not part of the miniature — they were 
also double exposed individually. It took three A.N.A.L.O.G. staff 
members to shoot this cover — one to operate the camera and time the 
exposures, one to control the lighting and one to operate the slide pro- 
jector. The final result is a combination of over a dozen separate expo- 
sures — the cover to A.N.A.L.O.G. no. 9. 
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BOSTON COMPUTER 

SOCIETY 

ATARI USERS GROUP 

Sheldon Buck 

Coordinator 

(617) 258-1531 or 

359-7695 

666 Main Street 

Medfield, MA 02052 



GETTING SERIOUS ABOUT 
PROGRAMMING YET?!? 



ATARI' 



UIMLOCK 
YOUR ATARI 



WITH THE WORLD'S MOST COMPLETE 
POCKET PROGRAMMING AID. 

j:^^5ir] 16 comprehensive pages 




REFERENCE 



CARD 




• error codes 

• basic commands with 
abbreviations 

• peek and poke locations 

• internal codes 

• machine language aides 

• much, much morel! . 

Get Yours Nowgn pc 

(dealer ad space available) 

ORDER NOW-CASH, CHARGE OR C.O.D. 

ADVANCED COMPUTING ENTERPRISES 
__. 5516 ROSEHILL A-1 ^^ 
QSi\ SHAWNEE MSN., KS 66216 ^''^ 
^(913) 262-2875 • (913) 631-4180^^ 




DISK WIZARD 



A COMPLETE DISK UTILITY PACKAGE AT AIM 
AFFORDABLE PRICE 

THIS COMPREHENSIVE PACKAGE INCLUDES THE FOLLOWING POWERFUL 
PROGRAMS FOR THE ATARI" 800 COMPUTER (MINIMUM: 32 Kl 



DISK BACK-UP 


DISK EDIT 


• SINGLE /DOUBLE DENSITY 


• REVIEW /MODI FY ANY SECTOR 


• SUPPORTS 1 OR 2 DRIVES 


• WORKS WITH ALL FORMATS 


• ALLOWS BACK-UP OF DISKS 
PROTECTED BY BAD SECTORING 

• FAST COPY OPTION 


• SINGLE / DOUBLE DENSITY 

• SECTOR DISPLAY IN HEX AND 
ASCII 


• SECTOR STATUS SUMMARY 

• OPTIONAL PRINTOUT OF SECTOR 
STATUS 


• SCAN SECTORS FOR A SERIES 

OF BYTES OR A STRING 

• DECIMAL/ HEX NUMBER CONVERSION 


DISASSEMBLER 


DISK SPEED 


• DISASSEMBLE FROM DISK BY 
FILE NAME OR SECTOR NUMBERS 


• VERIFIES /.ALLOWS ADJUSTMENT 
OF DISK SPEED 


• OPTIONAL OFFSET 




• OUTPUT TO SCREEN OR PRINTER 





COMPREHENSIVE MANUAL INCLUDED 



$29 



ORDERING INFORMATION 

For fast delivery, send ceriified 
check or money order. Personal 
checks; allow 2 to 3 weeks. 
MASTERCARD & VISA accepted. 
(Maine Residents add 5% Sales Tax) 
Phone orders accepted on C.O.D. 
and charges. 



'ATARI is a registered Trademark of Atari, Inc. 
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69 NEW BOSTON ROAD 
YORK, MAINE 039O9 
(2071 363-3036 or 
(207) 384-5068 
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SOFTWARE REVIEW: 
LETTER PERFECT Version 3 

LJK Enterprises 

Box 10827 

St. Louis, lUlO 63129 

Disic $149.95 Cartridge $199.95 



by Tony Messina 



Way back in issue 3 I wrote a review on the (then 
new) LETTER PERFECT word processor for the 
ATARI computer. Many companies would take a 
good review and rest on their laurels while they rake 
in the money. LJK ENTERPRISES is not one of the 
many. Since that last review, LJK has updated 
LETTER PERFECT three times. Each revision has 
added more functions and handy features. Version 3 
of LETTER PERFECT crossed my path and is the 
subject of this update. 

THE FEATURES 

LETTER PERFECT has gone through a number 
of cosmetic as well as functional enhancements 
which greatly improve its power. I will not go into a 
full blown review but will discuss only the 
improvements. 




LETTER PERFECT Version 3 
COSMETIC 

People cringe at the words cosmetic improvement. 
They think of the improvements as cover ups for 
serious defects. This is not true of LETTER 
PERFECT. This package needed a new identity to let 
people realize that it is as good as it appears to be. 
Some of the above mentioned improvements are 
subject dividers within the manual. This was needed 
and is useful for quick access to any portion of the 
manual. Speaking of which, the manual is now 
printed on nice, easy reading quality paper. Another 
great improvement cosmetically as well as psycho- 
logically occurs in the editor. No more keyboard 
click!!! The only click you hear is the noise of the 



keys as you type. Remember the horrifying RAZZ 
from the console speaker? It's gone!!! A gentle beep 
takes the place of the raspberry and makes the 
console much easier to cope with at 3 a.m. (When 
Tony apparently ivrites most of his articles, after quaff ing 
vats of coffee. Ed.) A flashing cursor replaces the 
static cursor of old and really does make it easier to 
find your place during editing of a document. All of 
the above alone would have made LETTER 
PERFECT far superior to mortal word processors. 
Did LJK stop with just these improvements? 
Noooooooooo! ! ! They had to really go all out in 
improving and adding things in the functional end of 
LETTER PERFECT 

FUNCTIONAL IMPROVEMENTS 

There are so many functional additions and 
enhancements I don't know where to start. 
However . . . The proportional font of the ATARI 
825 is now the default. One can now print any page 
or range of pages within a document. No more 
moving the page you want to the buffer, deleting the 
rest of the document, etc. Just specify 1, 6 when the 
HOW MANY COPIES prompt appears and you will 
get 1 copy of page 6. It's that simple. Remember 
when you did moves to and from the buffer you used 
to end up at the beginning of the document? No 
more! ! ! You are now returned immediately to where 
you were before you did a buffer operation. I 
mentioned the default font for the ATARI 825 as 
being proportional. I forgot to mention that 
LETTER PERFECT can handle not 1, not 2, not 3 
but virtually ANY PARALLEL PRINTER known to 
man. The program has default settings for ATARI, 
EPSON (any and all variations), QUME, and 
DIABLO. If you have another type of printer, just 
call in the DISK PRINTER EDITOR. This Menu 
driven utility allows you to set the parameters for 
your printer by answering some simple questions. 
The utility then writes the driver for LETTER 
PERFECT so that it can communicate with your 
printer! ! ! How about that! ! ! No . . . I'm not done yet 
— there is still more. There is a new insert mode 
(CNTRL I) which allows you to position the cursor 
at any point in the text. Hit control I and type your 
insertion directly in. No more need to use the 
control insert to make room for your insertions. 
Headers and footers can be alternated left and right. 
You can now scroll backward a full screen using only 
a one key sequence. No more control T control up 
arrow! There are now two types of buffer saves. One 
deletes the text from the document when it is moved 
to the buffer (old way) and also one which keeps the 
text intact (new addition). You can also move text 
from the buffer to the document without killing the 
buffer. An absolute replace has been added. This 
allows the replacing of 1 string with another 
automatically. No more stop-and-go with the space 
bar (unless you use the conditional replace which is 
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still provided). Yet another improvement is the 
CHR$ function which allows you to send control 
codes from your document directly to the printer. 
This is helpful (especially with a NEC equipped with 
a two color ribbon). Send it the code to print the 
following text in red and the NEC does it! ! The last 
item 1 want to mention is the FILE LINK function. 
You can now have a document of horrendous length 
simply by linking many files together. LETTER 
PERFECT will print a file, get the next, print it, get 
the next, ad infinitum. I have covered a lot of material 
and keep in mind that the above paragraphs only 
mention the additions to LETTER PERFECT The 
program still has all of the other functions I 
mentioned in my review in issue 3. 

HOW ABOUT 80 COLUMNS? 

The programmers at LJK have been busy little 
bees. Through an agreement with BIT-3 
PRODUCTS, LETTER PERFECT is available in an 
80 column version. I do not have the BIT-3 80- 
column board but I did use LETTER PERFECT on 
one at the A.N.A.L.O.G. offices. It really is super! 



THE VERDICT 

I have used all available word processing systems 
for the ATARI . . . and I do mean all! I have used 
dedicated word processors and even word 
processors available on mainframes. I can honestly 
say, without bias, that no other word processor 
available for the ATARI offers the flexibility and 
power which LETTER PERFECT provides. 

UPGRADE POLICY 

If you have an old version of LETTER PERFECT 
and you are a registered owner of that package (i.e. 
LJK has your program registration form) then you 
can get Version 3 by sending your old version and 
$30.00 to LJK ENTERPRISES. You will receive a 
master and a backup copy of LETTER PERFECT. If 
you can't part with your copy, send the $30.00 along 
with your name and program registration number to 
LJK and they will send you an updated version. 
When you get the update, send your old disk and 
LJK will send your backup. LJK also accepts VISA 
and MASTER CHARGE. D 



NEW FOR ATARI 



*********IMECESSITIES********* 
DISK COMMANDER II - Just save this program on your BASIC disks and it will 
autoboot and automatically list all programs from the disk into your screen. Simply 
run any BASIC or Machine Language program by typing a single number. 

Requires 16K, Disk Only 29.95 

BASIC COMMANDER - An all machine language program which occupies only 4K 
of RAM and is co-resident with your BASIC program. It is an indispensable tool for 
every ATARI BASIC programmer. Basic Commander allows single key access to 
DOS functions, BASIC file manipulation commands such as LOAD, LIST, ENTER, 
RUN. SAVE and more! Never need to access DOS again. RENUMBER allows you 
to renumber all Basic lines and all references instanla'niously! In addition, 
BLOCKDELETE allows deletion of anxj range of lines, eliminating computer lock- 
up. AUTONUMBER automatically provides line numbers for your BASIC program, 
increasing program entry speed from 25 to 75"n. If we've omitted your favorite 
commands, Basic Commander even provides 3 PROGRAMMABLE KEYS! 
THE MOST POWERFUL PROGRAMMING AID AVAILABLE 
FOR THE ATARI BASIC PROGRAMMER 

Requires 16K, Disk Only $34.95 

RAM TEST II - The fastest and most thorough memory test available for the ATARI 
has now been further improved! Tests not only all locations, but also tests the 
memory addressing system. This all machine language program takes 4 min. to test 
48K. It's the only program that testst he cartridge area of RAM. Good for new 400/800 
computer owners, for testing new RAM boards and for use in computer stores to test 
for any bad memory locations. Bad memory locations are pinpointed so repair is as 
simple as replacing a chip! 

Requires 8K, Disk or Cassette $29.95 

******** BUSINESS/HOME********* 
MAIL LIST - Extremely fast BASIC and machine language program. Each data disk 
holdsover 500 files. Sort on any of 6 fields at machine language speedor search on any 
fragment of a field! Use any size lables or envelopes. 

Requires 40K, Disk Only . $39.95 

*********** TUTORIALS*********** 

ASTEROID MINERS - This 50 page book and program provide for a unique 
intermediate-to-advanced tutorial. A 32K BASIC game utilizing over 25 players in 
player-missile graphics, machine language subroutines, a redefined character set, 
multiprocessing utilizing the vertical blank interrupt interval, and much more! The 50 
page book included with the program documents each part of the entire program and 
contains the fully documented source code for both the BASIC and assembly 
language parts of the program. Use these routines in your own programs. These 
examples make it easy! 

Requires 32K, Disk or Cassette $34.95 

ATARI is a registered trademark of ATARI, INC. N.J. Residents add 5% sales tax. 
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ALL MACHINE LANGUAGE ARCADE GAME 
WITH INTELLIGENT MONSTERS! 

This arcade style game is sure to become an ATARI classic 

Chnmper requires I6K RAM, 1 joystick and nerves of steel 

Available on Disk or Cassette $29 95 



Available at your favorite computer store or 
Send a check or money order directly to: 

MMG MICRO SOFTWARE 

P.O. BOX 131 • MARLBORO, NJ 07746 

or call (201)431-3472 

for MasterCard, Visa or COD deliveries 



1983 - Take Control 

A FINANCIAL WIZARD 1.5 




THE HIGHLY ACCLAIMED PERSONAL FINANCE SYSTEM FOR ATARI* 



Budget Forecast- 26 expense categories 
Check Entry -easy data entry -scan & modify 
26 major & 36 sub-categories -information blocl< 
Check Search -single or multiple parameters- 
(up to seven) to search entries 
Tabulations- detailed expense vs. budget 
comparisons by month, year-to-date, category 
Bar Graphs- screen displays in graph form 
expenses vs. budget-by month or category- 
printing with graphic capable printers 



Check Reconciliation -fast clearing of resident 
checks & deposits, complete summary report 
Checkwriter- prints your custom checlcs 
Printouts -most popular printers •Audit Report 
Multi-Colored Graphics • Audio Enhanosments 
7 Utility Programs • User- Friendly Operation 
Easy To Use Instruction Manual 
Handsome Tinted Plastic Storage Case 



The system .is designed for Atari computers having a 
minimum of 24K and operating from a disk drive. The 
price is only $59.95 plus $3 for handling/postage, 
if your dealer does not have A Financial Wizard . . . 
Telephone orders are accepted on 
Mastercharge or Visa credit cards. Mail order must be 
accompanied by check or money-order or credit card #. 
Dealer Inquiries invited. (405)751-2783. 



*trademarl( of Atari Inc. 



OK residents ad 4% Tax. 



A Financial Wizard 
Exclusively thru 

D CHECK ENCLOSED 

NAME (Print) 

Address 

City 

Card ft 



f,i7/l/ LIIMEi 



COMPUTER CENTERS a( OKC '- 



n VISA 



10944 North May 
Oklahoma City, OK 73120 
(405)751-2781 

n MASTERCHARGE 



. State. 



-Zip- 



-Exp._ 



-Sig. 
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SOFTWARE REVIEW: 
CANYON CLIMBER 

Data-Soft 
19519 Business Dr. 
Northridge, CA 91324 
16K Disk & Tape $29.95 



by Tony Messina 



If you've ever had the urge to go mountain 
cUmbing but didn't want to pack up and go to the 
Rockies, then perhaps CANYON CLIMBER is for 
you. 

THE GAME 

The objective of CANYON CLIMBER is to climb 
to the top of the Grand Canyon. Of course it sounds 
easy, however, you must pass through three levels of 
the canyon each of which contains its own obstacles. 
Level one pits you against angry mountain goats. You 
avoid these critters by leaping over them. In 
addition, you must plant dynamite on three bridges 
and make it to the detonator located at the highest 
level. Planting the dynamite requires you to walk 
over the end of each bridge, climb the ladders pro- 
vided and do the same for all bridges. Avoiding the 
goats and reaching the detonator box causes the 
bridges to explode and advances you to the next 
level. If the goats hit you, the player plummets to his 
or her doom in a pretty comical manner. 

At the next level you encounter the 
WEGONGETCHA (for lack of a better name) 
Indians. There are 4 levels to climb here. Each level 
has an Indian shooting arrows. You leap over the 
arrows to avoid them. Your timing must be perfect 
or you, again, will plummet downward. In addition, 
shields are available and will deflect the arrows. The 
only catch here is that you can't climb up the ladder 
until the shield disappears. (About 2-12 seconds, 
depending on level.) Timing is critical but if you 
master the ancient art of arrow leaping, you are 
mystically lifted to the third level. 

The third level has birds flying overhead. The trail 
is full of holes and dropoffs. Just run and leap over 
them. Oh, I forgot, the birds make matters worse by 
dropping rocks down at you. Failing to leap across a 
hole or getting hit by a rock causes you to fall to your 
doom once again. If you manage to get to the top, 
music plays as a goat zips out and knocks you back to 
the first level. 

At this point you start over. The goats get faster 
and have dirty tricks (like following each other back 
to back) which make it most difficult to leap over 
them. The arrows get faster as do the rocks. Points 
are accumulated until you have exhausted three 
lives. 



The details and playability of this game are very 
good. Your strategies must change at each level and it 
becomes increasingly more difficult to avoid falling 
to an early death. One point I'd like to make is the 
"Interest to bucks ratio." This is purely a subjective 
rating based on the question "Will I play this game 
enough to justify the $29.95 price?" The answer is 
based on many factors. If you like games such as 
DONKEY KONG, then the rating will be high. 
When this game was presented to the Software 
Conglomerate there were some members who 
couldn't get enough playing time. Others played 
three or four times, said "That was nice" and then 
lost interest. I give this game an overall "very good" 
rating. The best thing to do would be to try it at your 
local dealer if possible, then decide. D 




CANYON CLIMBER — LEVEL 1 




CANYON CLIMBER — LEVEL 3 



Canyon Climber Rating Scale 

(1 Unsatisfactory - 10 Ideal) 

Concept 7 

Originality 7 

Challenge 7 

Skill 8 

Graphics 10 

Sound 8 
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A.N.A.L.O.G.'s TOP TEN 

OUR FAVORITE GAMES FOR THE ATARI HOME COMPUTER 



Since this is our holiday issue, the staff of A.N.A.L.O.G. decided to sit down and pick out their 
favorite games. These are the games that the staff have been playing when they should have been working 
on the magazine, or else games they play in their spare time (what little there is). Readers may want to use 
this list as a guide for their holiday shopping, or they can see how we amuse ourselves after the magazine 
has been "put to bed." To determine A.N.A.L.O.G.'s TOP TEN, six members of the staff decided on 
ten games that they have played often in the last two months. This list is comprised of our all-time favor- 
ites plus new games that we have been wearing down joysticks on lately. Once the list was decided, the 
six staff members ranked the ten games in order, the best being number one, the lesser-played games 
being ranked to ten. These rankings were collected and reversed: the number one games were given ten 
points; the number two games given nine, and so on. The points were added, and here are the results: 
a semi-scientific ranking of A.N.A.L.O.G.'s TEN FAVORITE GAMES. 

1. STAR RAIDERS: Anoldiebutgoodiearound A. N. A. L.O.G., from atari, of course. This 
entry garnered 52 votes from the science-fiction damaged brains of our staff. De rigeur for future space- 
ship pilots. Cartridge. 

2 & 3. SUB COMMANDER and MINER 2049er: A tie between these two very new games, 
from Thorn EMI and Big-5 Software, respectively. Blowing up enemy ships and grabbing futuristic trea- 
sure gave these two games 42 votes apiece. Both of these games are on cartridge. Buy these — you won't 
be sorry. 

4. MISSILE COMMAND: With 41 votes, another oldie but goodie from ATARI, and one of 
the most nerve-wracking games for the 400 and 800 computers. A number of people have said that they 
don't like playing this game because it's too upsetting protecting their cities from annihilation. Cartridge. 

5. THRESHOLD: The ultimate Space Invaders-type shoot-'em-up, this entry was given 34 votes. 
How many readers out there have seen the flying cars? Our only complaint about this game is that it is 
almost too difficult. On disk only, 40K, from Sierra On-Line. 

6. PAC-MAN: Need we say more? One of the all-time great computer games, from ATARI (29 
votes), and the best "eat the dots" game available. Cartridge. 

7. CHOPLIFTER: A game with super graphics, this Apple translation got 28 votes in our poll. A 
great game to play if you have a sadistic nature (heh heh). Our chief complaint about this Broderbund 
Software game is that the sound effects need a lot of work (as with most Apple translations). Disk, 48K. 

8. K-RAZY SHOOT-OUT: Originally from K-Byte, this cartridge-based game is one of the few 
computer games that is superior in every way to its arcade counterpart. With 26 votes, this game wears 
down many a joystick around A.N.A.L.O.G.'s offices. 

9. PREPPIE: With 20 votes, this Adventure International release is their most successful ATARI 
game yet. Dynamite graphics and superb music make this one of our favorites. Cassette or disk, 32K. 

10. ALI BABA: With 15 votes, this is one of the nicest graphics-oriented adventures available. (It's 
a favorite of Charles Bachand.) From Quality Software, this will make a fine addition to anyone's adven- 
ture library. Disk, 32K. 

Well, that wraps up our favorite games for the year. All of the staff at A.N.A.L.O.G. hope that our 
readers have a happy holiday season. What will the new year offer? Many more games, more utilities and 
all-around support for your ATARI computers from A.N.A.L.O.G. Computing, the original ATARI- 
only magazine. 
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CASSETTE 16K DISK 24K 



by Thomas A. Lewry 



This is a two or four player game, the object of 
which is to be the first player or team to get 5 of your 
playing pieces in a row (horizontally, vertically, or 
diagonally) OR be the first to 'capture' 5 pairs of 
your opponent's pieces. 

The playing board is a 21 by 21 grid. A playing 
piece may be placed at any intersection on the grid, 
including the edges and corners. Players take turns 
placing pieces on the board. If there are four players, 
divide into two teams: players 1 and 8 against players 
2 and 4. A player may place his piece in any 
unoccupied spot on the board regardless of where 
previous pieces were placed. However, it is 
strategically wise to place pieces close together. 

Once placed, a piece cannot be moved except by 
being captured. A capture occurs when a player 
surrounds EXACTLY 2 of his opponent's pieces 
with 2 (or more) of his own. The opponent's pieces 
must be adjacent to each other to be captured. 
Captured pieces are removed from the board by the 
capturer. (Remember that capturing 5 pairs of your 
opponent's pieces is one way of winning the game.) 
Here is an example of capturing: (* = your piece; X = 
opponent's piece; - = empty space) 
-*XX*- -*X-X*- '*XXX*- 

(1) (2) (3) 

In ( 1 ), a pair of opponent's pieces is captured (2 of 
your pieces surround 2 adjacent opponent's pieces). 
In examples (2) and (3), there is no capture. In (2), 
the opponent's pieces are not adjacent. In (3), your 
pieces do not surround exactly 2 of the opponent's 
pieces. All three examples are legal moves, it's just 
that no capture occurs in (2) or (3). 

A final word about capturing. As noted above, 
you must surround the opponent's pieces. This 
means that you must make the capturing move. 
Thus, if your opponent places 2 of his pieces 
between 2 of yours, no capture takes place (because 
YOU did not do the surrounding). This can be 
illustrated as follows: 

' * X - * - * X X * - 

(Before) (After) 

It is your opponent's move. Before he moves, the 
board looks like the set-up on the left. After he 
moves, the board looks like the set-up on the right. 
He has placed his pieces between yours, you have not 
surrounded his. Thus, there is no capture. 



For a more extended example of the various legal 
moves, run the program and ask for instructions. A 
short sample program will illustrate them for you 
and provide a brief commentary. 

Now, for those of you who (like me) like to tinker 
with programs to make them even better, here is a list 
of variables and an explanation of how the program 
works: 

A - Temporary variable. Usually holds user's 
keyboard input. 

A$(l) - Stores user's keyboard input in character 
form. 

BL - Used to make the words blink in the sample 
game routine. 

CAPT(l) - Holds the number of pairs captured by a 
player or team. 

CNT - counter used to keep a player's piece invisible 
for a fixed length of time (i.e. makes the piece appear 
to blink). 

CI, C2 - Colors used to make a player's piece blink 
during the sample game routine. 
DRAWIT - Line number of a subroutine to draw a 
player's piece. 

GRO - Line number of a subroutine which sets the 
colors for graphics mode 0. 

I, J - Temporary variables. Usually in FOR/NEXT 
loops. 

II, T - Temporary variables. 

INSTR - Line number of a routine to print 

instructions. 

LOOP - Line number of subroutine used by the 

sample game routine. 

LI , L2 - Temporary variables. Used to make winning 

player's pieces blink. 

P - Number of players. 

PL - Player currently moving. 

Qx - Constants, ('x' is the value of the constant). 

SAMPLE - Line number of a routine which displays 

a sample game. 

SND - Line number of a subroutine used to make'a 

sound as the player's piece moves. 

ST - Value returned from STICK( ) function. 

STICK - Line number of joystick movement routine. 

TIME - Line number of a subroutine to provide a 

short time delay. 

WIN - Line number of a routine used to notify the 

players of a win. 
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X, Y - X and Y positions on the screen. 

XX, YY - Temporary variables. Used to compute 

new X and Y values during the stick movement 

routine. 

X(8), Y(8) - Direction vectors. Together, they 

specify the 8 directions of movement (N, NE, E, 

. . . ). Used to determine what surrounds the most 

recently placed piece while checking for a win. 

Z, ZZ - Temporary variables. Used to hold the color 

at a given screen location. 

Program Description 

Lines 20-40: Check for a player having 5 of his 
pieces in a row. This is done by starting at the piece 
just placed and looking for adjoining pieces of the 
same color in one of 4 directions. If there are not 5 in 
a row in that direction, we look in the opposite 
direction starting with the last piece found by the 
above step. If still no 5 in a row, check the remaining 
8 directions as above. 

Lines 50-80: Check for a capture. 2 of current 
player's pieces must surround exactly 2 of his 
opponent's with no gaps in between. First, look for 
pairs of adjoining opponent's pieces in one of the 8 
directions around the player's piece. If a pair is 
found, then check to see if the next piece in that 
direction is the current player's piece. If so, we have a 
capture. If not, no capture. We must check ALL 8 
directions because it is possible that a single move 
captures more that one pair. 

Lines 100- 140: A capture has occurred. Remove 
the captured pieces from the board and put them in 
the capture stack on the screen. Add 1 to current 
player's capture total. If player has captured 5, he has 
won. If player hasn't won yet, look for more captures 
('NEXT r in line 140). 

Line 200: Puts a "+" on the screen. (Color has 
been set by the calling routine.) 

Lines 300-370: A player has won. Make some 
noise, flash his pieces, and then leave the board on 
the screen until the players do something. Finally, 
ask if they want to play again. 

Line 500: Used by the win routine to make the 
winner's pieces flash. 

Lines 5000-5140: Moves the current player's 
piece around the screen and checks to see if he has 
pushed the joystick button. 

Line 6000: Sound for piece being captured. 

Lines 7000-7999: Instructions. 

Lines 10000-10140: Initialization and preliminary 
questions. 

Lines 10150-10180: Draws board on screen with 
sound effects. 

Lines 15000-15500: Sample game routine. The 
board is drawn and each piece is placed on the screen 
with a short comment about what is happening. 

Line 20000: Creates a short time delay when a 
routine GOSUBs to this line. 

Line 25000: Sets up a graphics screen with 
predetermined colors. D 



le GOTO loeeo 

28 KX=K:VV=V:F0R 1=01 TO 04; FOR J=01 T 

04:L0CATE K+XCI>»J,Y*VtIJ»J,Z:IF Z=P 

L+02 THEH MEKT J : GOTO MI» 

30 POP :}< = H+HriJ»tJ-01) :V=V+Y<I)«CJ-Ql 

) :II=Q4+I:F0R J=Q1 TO Q4:L0CATE X+Xfll 

>«J,V+VCIIJ»J,Z 

35 IF Z=P« +02 THEM MEXT J:GOTO UIN 

4e POP :X=XX:V=YV:MEXT I 

50 FOR I=Q1 TO D8:F0H J=D1 TO 07 

60 LOCATE X+XtIJ»J,V+V«IJKJ,Z:IF ZOt 

MOT PLJ+02 THEM POP :MEXT IlGOTO STICK 

80 NEXT J:LOCflTE X+X tIJ*03 , V + Y {IJ»Q3, Z 

:IF ZOPL+D2 THEM MEXT I:GOTO STICK 

108 CflPT{PLJ=C6PT(PI.)+01 

105 XX=X:yv=V:X=XX+XflJ ;Y=YV+VtIJ :C0L0 

R Ql:G0SUB DRANIT:GOSUB SND 

110 COLOR ( MOT PL)+02:X=PL»124+Q16:Y= 

87-tCAPT{PLJ»Q4J ZGOSUB DRAWIT 

115 X=XX+KfIJ#Q2:Y=YY+VfI)»Q2:C0L0R 01 

:GOSUB DRAMIT:GOSUB SND 

120 COLOR C MOT PL3 +02 : X=PL»124+20 : V=8 

7-(CflPTCPLJ»04J :GOSUB DRAMIT 

130 IF CAPTtPLJ=05 THEN GOTO WIN 

148 X=XX:Y=VV:NEXT I: GOTO STICK 

200 PLOT H,V-l:DRAHTO K,Y+1:PL0T X-1,V 

:DRAMTO X+1,V: RETURN 

300 C1=PL«O5+O4:C2=OO:L1=Q10:L2=O2 

305 FOR Z=Q1 TO 208:S0UND «e,243-Z,010 

,Q15:50UHD Q1,200-Z,12,Q5:GOSUB 500:NE 

XT Z:T=250:GO5UB TIME 

310 FOR Z=:43 TO 230:SOUMD 00, Z, 010,015 

SSOIIND 01,Z-43,08,05:NEXT Z:FOR ZZ = Q15 

TO 00 STEP -01:50IJHD Q0,Z,Q10,ZZ 
328 SOUND Q1,Z,08,ZZ:G0SUB TIME:HEXT Z 
Z 

338 POKE 764,255 
340 IF PEEKf754J=255 AND STICK (00) =015 

AND STICK(01)=Q15 AND STRIG(O0)=Q1 AN 
D 5TR1GCQ1J=Q1 THEN 348 
345 POKE 764,255 

350 60SUB GR0:? :? "Play again?"; :6ET 
«1,A:AS=CHR5(A) :IF AS="V" THEN RUN 
360 TRAP 370:? '.? "Running MENU": RUN " 
Dl:MENU" 
370 ? :? 
":END 

500 T=C1:C1=C2:C2=T:T=L1:L1=L2:L2=T:SE 
TCOLOR PL +01, CI, LI: RETURN 
5080 X=«8:Y=45 

5810 LOCATE X,Y,Z:IF Z=01 THEN 5050 
5020 X=X+Q5:IF X>O130 THEN Y=Y+04:X=80 
5030 GOTO 5010 

5050 PL=C NOT PLJ: COLOR PL+02 : CNT=QO : G 
OSUB DRAMIT :ZZ=Z 

5060 ST=STICKCPL> :IF STOQ15 THEN 5070 
5062 IF STRIGtPLJ=OB AND ZZ=Q1 THEN 20 

5064 CNT=CNT+01:IF CNKOIO THEN 5060 

5065 COLOR ZZ:IF ZZ=PL+02 THEN COLOR 
1 

5066 GOSUB DRAMIT: FOR J=Q1 TO Q10:G0SU 
B TIHElNEXT J:COLOR PL+Q2:G0SUB DRAMIT 
:CNT=:O0:GOTO 5060 

5070 POKE 77,0:C0L0R ZZ:GOSUB DRAMIT 

5075 XX=CST>4 AND ST<8J-fST>8 AND ST<1 

2) :X=X+KX»05 

5080 IF X>0130 THEN X=0130 

5090 IF X<O30 THEN K=Q30 

5100 YY=CST=9 OR ST=13 OR ST=5)-tST=10 

OR ST=14 OR ST=6J :V=V+YY«04 
5110 IF Y>Q84 THEM Y=«84 
5120 IF V<Q5 THEN Y=05 
5130 LOCATE X,Y,Z 

5135 SOUND Q0,200,O10,O10:GOSUB TTME:S 
OUND 00,00,00,00 

5J40 COLOR PL+02:G05UB DRAMIT : ZZ=Z : GOT 
5060 

6080 SOUND QO,5O,Q10,O15:GOSUB TIME;SO 
UND Q0,QO,Q0,O0:RETURN 

7000 ? "H":POKE 752 r 1 : SETCOLOR 02,11,0 
2:5ETC0L0R 04,11,02 

7010 ^ " IHHUtH TAKE 5 JHHHHt" 

7020 ? :? " The Object of the gane is 

to either capture 5 pairs of your opp 
onents" 

7030 ^ "playing pieces or get 5 of you 
p piecesin a row (horizontally, yerttc 
ally, or"; 



MENU is not available 




^IThW DIFFERENCE. 

SPBED! 




■ c. taken the First Step m ' FREE anytime otthe day ^^^ply dial. 

SSSSS=:;r.=-^. 1-800-547 8OO» 



ov?-.'^'!!. 30°/. 

DISK DETECTIVE ™^ - >' 

Sr'HaIter IsI^ 



YOUR CHOICE'. 
ONLY $20.95 each. 

30% OFF 
^ UST 



,i„e, you wiH "=ce.ve , 



s Free Dehvery^on ALL^ 
r-hin \within < 



shipping anuhar.dim9,r,.-.. 
MASTERCARD orders! 



VISA-MASTERCARD AND aO^- ^"L^^^ 

^niilCCiOrt 

^^■, ,TT? b'^ lSr64 Eugene, OB 9J«0 
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7840 ? "diagonally). Captures can onl 
y be Made by surrounding exactly 2 
of your" 

7850 ? "opponent's pieces with your ow 
n. A capture does HOT occur if your 

7860 ? "opponent places two pieces bet 
ween yours." 

7870 ? :? " You use the joysticks to 
position a cursor, then press the bu 
tton to" 

7880 ? "place your piece on the board, 
flt theend of the gane, the board wil 
1 rcMd in"* 

7898 ? "on the screen until you hit a 
key. Move a joystick, or press a bu 
tton." 
7180 POSITION 2,23:? " HIT AMY KE 

Y TO COMTINUE"j :6ET «;l,fl 

7110 ? "IS":? " Two or four people May 
play this gaMe. If four play, bre 
ak up into" 

7120 ? "two teaHs. Players 1 and 3 ar 
e on thesaMe teaM and alternate turns 
With" 

7130 ? "players 2 and 4." 
7200 ? :? " fln exaMple gawe follows;" 
799t) POSITION 2,23!? " HIT OHY KE 

V TO CONTINUE"; :GET »:1,A:P0KE 752,0:60 
TO SAMPLE 

10000 Q0=0 : 01=1 : 02=2 : 03=3 : 04=4 : 05=5 : 06 

=6 : Q7=7 : 08=8 : 09=9 ; 018=18 ; 015=15 : 016=16 

: 030=30 : 048=48 : 084=85 

18818 0138=138 : 5TICK=5888 : DBAWIT=288 : T 

IME=2800e : MIN=388 : IHSTR=7088 : SND=6800 : 

SAMPLE=158ee:LOOP=16880:GR8=25888 

18830 DIM A5C1},H(8),Y(8],CAPTC1) 

18848 K COD =08 : K C02) =05 : K 103) =05 : K C04) 

=05 : K COS) =00 : X CQ6) =-«5 : X C07) =-05 : X CQ8) 

= -05 

18842 Y tOl) =-04 : Y (02) =-04 : V (03) =08 : Y (Q 

4)=Q4:YC05)=Q4:Y(06)=04:Y(07)=08:YCQ8) 

=-«4 

10844 CAPT(0e)=08:CAPT(01)=Q8 

18858 OPEN ttl,4,8,"K:":G05UB GR8:? :? 

"Do you need instructions?"; :GET ttl,A: 

AS=CHR5(A) :IF AS="V' then GOSUB INSTR 

18868 GOSUB GR8:? :? "How Many players 

? C2 or 4)"j:GET ttl, P :P=P-48 : IF P<>2 A 

ND P<>4 THEN 18060 

18188 POKE 752,1:? ;? :? :? "Player";: 

IF P=2 THEN ? " 1 is RED and uses"; :G0 

TO 18128 

18118 ' "s 1 and 3 are RED and use 



18128 ? " joystick 1 
IF P=2 THEN ? " " 
OTO 18148 
18138 ? "S 2 



? :? "Player"; : 
2 is BLUE and uses";;G 



and 4 are BLUE and use 



HI 



18140 '} " joystick 2,":? :? " 

T ANY KEY TO BEGIN"; :GET ttl, A 

18150 GRAPHICS 07+016 : SETCOLOR 08,08,0 

2:SETC0L0H 01,04, QIO: SETCOLOR 02,09,01 

0: SETCOLOR 04,08,08 

18155 COLOR 01 

10168 FOR 1=00 TO 20;PLOT 030,1*04+05: 

DRAMTO 0138, 1*04+05 :PLOT 1*05+038,05:0 

RAi4T0 1*05+030,084 

18178 SOUND O8,2B8,O10,O1O:GOSUB TIME: 

SOUND OO,OO,O0,OO:NEKT I 

18188 PL=01:G0T0 STICK 

15808 GRAPHICS 07:SETC0L0R Q1,Q8,02:SE 

TCOLOR 08,04,01B:SETC0L0R O2,O9,O10:SE 

TCOLOR 04,08,00 

15818 COLOR 02;F0R 1=08 TO 28:PL0T 038 

,I*04:DRAHT0 0130, 1*04 : PLOT 1*05+030,0 

8:DRAi4T0 1*05+030,80 

15828 SOUND 08, 280,018, 010 :GOSUB TIME: 

SOUND Q8,0e,08,08;NEXT I 

15838 POKE 752,1:? " SAMPLE 

GAME" 
15835 FOR J=01 TO 508:NEXT J 
15848 POKE 656,02:P0KE 657,14:? "Basic 

Moves"; 
15858 C1=01:X=45:Y=24:G0SUB L00P:C1=03 

:x=4e:Y=2e:G0SUB loop 



15868 C1=01:X=55:Y=24:60SUB L00P:C1=Q3 

:X=35:Y=16:G0SUB LOOP 

15098 POKE 6 56. 02: POKE 657,11:? "GHaB 

Hinna^EIIIi"; : Cl=Ql : x=30 : Y=12 : GOSUBL 
OOP 

15100 X=35:Y=Q16: COLOR 02: GOSUB DRAUIT 
: GOSUB SND 

i^H2 £21;°'* 03 :X = 016:Y=76: GOSUB DRAWIT 

15115 FOR J=01 TO 50: NEXT J 

15120 X=40:Y=20: COLOR 02: GOSUB DRAHIT : 

GOSUB SND 

15130 COLOR 03:X=20:V=76:G0SUB DRAHIT: 

FOR J=01 TO 20e:NEXT J 

15135 POKE 65e,02:P0KE 657,11:^ " Ba 

Sic Moges "; 

15140 C1=Q3:X=40:Y=28:G0SUB L00P:C1=01 

:X=58:Y=24: GOSUB LOOP 

15150 POKE 656, 02: POKE 657,14:? "daRI 

fSnaS "; :C1=03:X=35:Y=16:G0SUB LOOP 

15160 POKE 656,Q2:P0KE 657,14:? "Basic 

Moves"; 
15170 C1=Q1:X=40:Y=24:G0SUB L00P:C1=Q3 
:X=35:Y=24: GOSUB LOOP 

15188 POKE 656,Q2:P0KE 657,14:? " SHai 
muLEU "j:Cl=Ql:X=60:Y=24:GOSIJB LOOP 
15500 POKE 656,03:P0KE 657,09:? "HIT A 
NY KEY TO CONTINUE"; ;GET ttl,A:RETURN 
16800 GOSUB SHD:C2=Q2:BL=l:F0R 1=01 TO 

05:C0L0R Cl:G05UB DRAMIT:POKE 755, BL+ 
i:for J=oi to 188:NEXT J:T=C1:C1=C2:C2 
= T 

16108 BL=( HOT BL):NEXT I:RETURN 
28088 RETURN 

25800 GRAPHICS 00:SETCOLOR 02,08,02:5E 
TCOLOR 01,08,12:5ETC0L0R 04, 08, 02 : RETU 
RN 



DrCHECK DATA (see p. 29) 

18 DATA 889,639,256,681,682,288,728,88 

9,993,141,683,387,494,465,581,8628 

288 DATA 956,43,429,510,590,28,946,37, 

194,587,359,228,894,672,966,7441 

5838 DATA 856,783,107,124,577,136,835, 

817,583,197,77,841,131,114,582,6528 

5135 DATA 988,869,92,354,568,368,862,5 

88,273,52,449,748,158,514,889,7676 

7128 DATA 969,845,38,497,848,487,947,8 

64,435,849,221,582,55,354,519,8422 

18138 DATA 461,557,577,983,632,58,153, 

398,744,816,637,972,49,886,915,8838 

15898 DATA 932,681,348,757,630,747,969 

,986,859^315,754,466,188,342,595,9393 

28808 DATA 777,997,1774 




TAKE-5 



DON'T ASK PROVIDES THE MISSING LINKS 

o-o» the link between your modem and the outside world. For hassle-free 
communications, phone right in with TELETARI, The Friendly Terminal. 




Your Atari has never had such easy access to the whole world of telecommunications- bulletin boards, news reports, large time- 
sharing computers, the works. Now it's a snap to tap into all these, and it's just as easy to transfer your program or text files to and from a 
remote computer. Meet TELETARI, The Friendly Terminal. It's just what your modem needs: a powerful, adaptable telecommunications 
package that's a cinch to use. With TELETARI, you simply choose the desired communications function from a menu. Commonly used 
terminal parameters are included in the program, but you can change them to suit your needs with a couple of keystrokes, using another 
handy menu, and store the ones you plan to use again. TELETARI's generous buffer stores up to 20K, so you can review, print, or save 
received information long after you've hung up the phone. You never knew using a modem could be so convenient. Because it's very 
flexible, TELETARI is compatible with most modems and a wide variety of computers. And because it works through the RS 232 port, 
TELETARI is not limited to modem/telephone uses. Put it to work in any RS232 application your imagination can devise - even operating a 
laser diski 



• buffer of up to 20K • menu-driven • highly adaptable 

• compatible with 1200 baud modems and BIT 3 Full-vievi/ 80'" board 

$39.95 Requires Basic, 32K RAM, disk, 850 Interface 



• supports all 850 options 
suitable for any RS232 application 



CX» the link between BASIC and arcade-style graphics. Draw and animate pictures for your own BASIC games 
and other programs with pm ANIMATOR. Create running men, flying rockets, moving figures of all kinds. 



A 



Jt 



Coming soon 
from DON'T ASK. 



i 



i 



mn^r 




1 



BASIC programmers, pm ANIMATOR puts the power of 
Player- Missile Graphics at your fingertips. 

$34.95 Requires 32K RAM, BASIC, disk. 



'''animator 



□ ATAiS' 




Z^ 



To order direct from Don't Ask, send a cfieck or money 
order, or call to order COD. Add $2.00 for shipping and 
handling. California residents add 6% sales tax (6.5% if 
you reside in L.A. County). 



o-o> the link between fast game action and verbal learning; 



■^susess^ 



Kids and adults, increase your vocabu lary while you compete in this 
exciting word game. 
Disk version: 

3 levels of play- Beginner, Regular, Challenge 

Requires 32K RAM, disk, BASIC. $24.95 
Cassette version: 

2 levels of play- Beginner, Intermediate 

Requires 16K RAM, cassette, BASIC, $19.95 

turn WORDRACE into a history game or a famous atfiietes 
game, and get more vocabulary v/ords, witfi the WORDRACE 
accessory disk: CLAIM TO FAME/SPORTS DERBY. 3 newgames in 
all. 
Disk only. Requires WORDRACE disk. $1 9.95 



Alari is a trademark of Atari. Inc. Full-view 80 is a trademark of BiT 3 Compuler Corporatioi 




o-o> the link between you 

and what your Atari is 
really thinking: 

AeUSE 

the insult-exchange program. 
Have you cursed out your computer? Now 
it can understand you and answer back! 
Requires 40K RAM, BASIC, disk. $19.95 
Release your aggressions! Inflict ABUSE 
on anyone who's got it coming! 



DON'T ASK 

CX3^ tfie link between technical excellence 
and tfie fun of computing. Why do we give 
you so much? Don't Ask. 



D®IYTASK 

COMPUTER SOFTWARE 



INC. 



2265 Westwood Bl., Ste. B-1 50 

Los Angeles, GA 90064 
(213)475-4583 or 397-8811 
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AUDCTL-DEMO 



CASSETTE OR DISK 16K 
by Jerry White 



AUDCTL is an abbreviation for AUDIO 
CONTROL, and a label given to decimal location 
53768. For those interested in reading up on the 
functions of the various sound registers, I strongly 
recommend that you read the SOUND chapter in 
De Re ATARI about three times, and that you try 
the little demonstration routines supplied. 

For those who don't really care to know why 
things happen, but like to take advantage of the 
amazing range of sound effects that are available 
from BASIC, I submit the following little demo 
program. In a nutshell, POKE commands into deci- 
mal locations 53760 through 53767 are used to 
create a full C MAJOR CHORD. To further enhance 
the effect of this program, we slide up to the higher C 
note in line 180. 

At the prompt, you may enter a value which will 
be POKEd into decimal location 53768. Start by 
entering zero so you can hear the effect with no 
distortion before we begin experimenting. By 
entering other values from 1 to 255, you will notice 
some strange sounds coming from your TV speaker. 

There is probably no better way to learn how to 
create sound effects than by trial and error. 
Hopefully, this little demonstration will provide 
some food for thought. D 



186 GOSUB 230:REM ftUDCTL DEMO BY JERRY 

WHITE 6/2/82 
lie FOR OFF=0 TO 3:50UND OFF , , , : HEX 
T OFFiREM TURN OFF OLL 50UMD5 

129 ? :? "EMTER a NU MBER BETHEEW AND 
'■:? "255 THEN PRESS HSUIilll"; 

130 POKE 764, 255: TRAP 120 : INPUT NUMBER 
140 NUMBER=IHTtNUMBER) :IF NUMBER<0 OR 
NUMBER>255 THEN 120 

150 POKE 53760, 243:P0KE 53762, 81 : POKE 

53764, 36:P0KE 53766, 121 : REM C MAJOR 

160 FOR K=53761 TO 53767 STEP 2:P0KE K 

,162:HEXT K 

162 REM DI5T0RTI0N=10 U0LUME=2 (16*16+ 

2=162J 

170 POKE 53768, NUMBER:REM OUDCTL 

180 FOR K=243 TO 60 STEP -1:P0KE 53760 

,X:NEXT X:REM SLIDE SOUND 

190 ? :? "PRESS [M3 TO END":? "PRESS fl 

NOTHER KEY TO CONTINUE" : POKE 764,255 

200 KEY = PEEKC764J :IF KEY=:28 THEN POKE 

82,2:? :? "BASIC":? "IS"; :END 

210 IF KEY0255 OR PEEK t53279J <>7 THEN 

110 
220 GOTO 200:REM WHATCHA WANT? PRESSA 
KEY! 

238 GRAPHICS 0:SETCOLOR 2,9,0:P0KE 82, 
5:? :HEM CLEAR SCREEN/LEFT MARbIN=5 
246 ? :? "This prograw was designed" 
250 ? :? "to dewonstrate the effects" 
260 ? :? "Made possible by altering" 
270 ? :? "the Audio Control Register" 



286 ? :? "at decinal location 53768" 
290 ? :? "tSd2e8J .":RETURN 



DrCHECK DATA (see p. 29) 

100 DATA 948,804,38,33,812,721,958,500 

,364,71,44,334,84,637,713,7061 

248 DATA 871,637,795,408,437,383,3531 



TAKE A CLOSER LOOK AT YOUR DISKS 
SEE WHAT'S REALLY THERE 
WITH 




DISKED 



(disk'= ed) 
by Mark Logies 

THE DISKED UTILITY PACKAGE contains numerous utility 
programs plus a comprehensive users' manual. With DISKED 
you can view and edit the contents of any sector in HEX, 
DECIMAt or CHARACTER (ATA5CII or SCREEN CODE). You can 
disassemble programs into 6502 mnemonics using virtual 
addressing. You can recover deleted files, save crashed 
diskettes, map used and crashed sectors, copy any sector or 
block of sectors, move cassette boots up to disk and vice 
versa, create immediate mode Tiles and multi-boot disks, 
PtUS MUCH MORE! 

Each program is listable and user adaptable. 

Runs in 24K DNtV $89.95 

Call or write for more information on all of our software. 

GET MORE OUT OF YOUR INVESTMENT 
EXPAND YOUR ABILITIES WITH DISKED 

re onvi'R s[no cinck ok •■iohl" choh: tc: 




- ^' PMTFRI 



ENTERPRISES 

P.O BOX 25612 
GARFIEir HFir.HT?. OH Jd'25 

(216) ui'b-nee 
CRVi.as ".LLsf :-:CLiiOi ^i.j^ ^ni'Viwi ■\uo HA.^tJLi.% 
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BUILD YOUR OWN 400 KEYBOARD 



by Robert E. Meyer 



Ever wish you could replace your monoplane 
keyboard with a full travel keyboard? 1 have not 
found a direct replacennent yet, but this article will 
show you how you can add the full travel keyboard 
externally. 

You will use a three to four-foot piece of ribbon 
cable and tie into the mother board of the computer, 
and then add connectors and terminate the cable at 
your new keyboard. There will be no physical 
modifications to the case of your 400. 

Please remember that this modification will void 
your warranty. 

The fact that the keyboard electronics resides on 
the mother board will make your job a lot easier. You 
will only need to match the matrix of the old 
keyboard to your new one. 

Look at figures number one and number two. 
These are diagrams of the ATARI 400 monoplane 
keyboard matrix. To the right and below each letter, 
number, or key symbol is a point where two lines 
cross. When you press the key you connect the lines 
where they cross on the diagram. 
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DEAL EXCLUSIVELY IN PRODUCTS 
FOR THE ATARI (THE BEST) COMPUTER 




SHAMUS 





32 Rooms with four levels of INTENSE 
arcade action with this game. Every 
room bristling with DANGER. 



16KDiskorTaDe 



$31.50 



FROGGER 




This is the 

genuine FROGGER 

game that you see 

in the arcades. Made by the^same people 

that made Jawbreaker (One of the top ten 

sellers.) 

32KDisk 16K Tape $31.40 



^m 




Just like the arcade game that has been 
so popular. This is one of our BEST sellers 
for all ages. 

24K 16K 

$35.10 Disk $39.90 Cart 




CALL 



$109 
$648 
$197 
$ 26 
$ 63 
$ 9 
$ 28 
$ 99 
$153 
$588 
$387 



HARDWARE 

Prices listed with (*) are the CASH 
discount price, charge prices are higher. 

800 Computer 1 6K 

800 Computer 48K 

400 Computer (used) 

810 Disk Drive 

850 Interface 

410 Recorder 

16K Ram module 

32K Ram module 

Percom Disk Drive 

48K Ram module for 400 

WICO JOYSTICK 

Trac Ball controller 

800/400 Dust cover 

10 Blank Disks 

Mark II Modem 

Alien Group Synthesizer 

Epson MX-80FTA'lus 

Amdek Color 1 monitor 

12' Joystick Extension Cord $ 10 

Computer Paper 1000 Bix11 $ 17 

Trade In your 400 for a NEW 

800 Computer Call for details. 

SOFTWARE 

ZAXXON 
Now you can get that powerful 3-D 
game for the Atari. Made by one 
of the BEST game makers Datasoft. 
Order early to get yours D $35.10 

EASTERN FRONT 
The MOST popular of all the APX 
programs and truly one of the best 
war games for the Atari. D,T$27.90 

SAMMY THE SEA SERPENT 
A must for the little computerists 
ages 4-7. The kiddies LOVE this 
one and "Sammy" too. Tape $15.90 

BAJA BUGGY 

If you have been waiting tor a good 

Car racing game for the Atari then 
this is it ! Disk or Tape $29.90 

BUG ATTACK 
You must defend your garden from 
hungry bugs. Ekjt, look out these 
bugs shoot back' Disk/Tape $26.90 




Fm] 



ATARI PRODUCTS CATALOG 

with any order or 

send $1.00 refundable with order 



METEOR 



STORM 




The city is about to be destroyed and 
ONLY you can save its people from 
destruction. FAST, arcade type action 
game. 

16K DiskorTape $29.95 




A SUPER graphic game in which you are 
the miner and must watch out for mine 
flooding and monsters of the deep. 






The aliens have 
landed and it's 
your job to 
the city 
(If you 

cani) TOP RATE 
GAME. ARCADE 
QUALITY, HI- 
RES Graphics & 

Sound. 16K TAPE 
32K DISK 

$26.90 



VISA' 



TO ORDER CALL (503) 683-5361 



HOW TO ORDER: Send check or money order or phone your order using your charge 
card. Ask about our 48 hour delivery service. Shipping on programs is $2.00 per order 
in USA or $3.90 for the 48 hour AIR service. Call tor Hardvuare shipping costs. Prices 
subject to price change without notice. 



Store Hours 
8 am - 6 pm 
Mon. - Sat. 



2160 West 11th Ave., Eugene, Oregon 97402 
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Note that the lines extend up and to the left of the 
diagram where they terminate at a pin number. Each 
of these pin numbers corresponds to a pin number 
on the twenty-two pin connector on the mother 
board. This is the connector that the monoplane 
keyboard plugs into. When you wire the keys on 
your new keyboard to connect the same pins as the 
monoplane keyboard when the keys are pressed, you 
will have successfully completed the modification. 

The four keys to the right side of your 
monoplane keyboard can be treated as any of the 
others. 1 like to refer to these keys as function keys. 
They are the Reset, Option, Select, and Start keys. 
When any of these keys are pressed they connect a 
ground (Pin number twenty-two) to their respective 
pin numbers. If you purchase an inexpensive 
keyboard you will probably elect to not include 
them on your new keyboard. 

The first step will be to obtain your new keyboard. 
There are several good sources of keyboards. James 
Electronics of Belmont Ca. offers a good assortment 
of keyboards. They range in price from twenty to 
forty dollars. 

Do not purchase a keyboard that includes the 
electronics or has a prewired matrix. Your best 
purchase is a basic nonwired keyboard. You will see 
keyboards advertised with different amounts of 
keys. They will range from fifty-six to eighty-eight 
keys or more. Which keyboard you purchase is 
dependent on what you want to include on it. 

The ATARI 400 keyboard contains fifty-six keys, 
the space bar, and the four function keys. This gives a 
total of sixty-one keys. You may elect to just leave 
the four funcdon keys on your 400 and opt for a less 
expensive keyboard. You could obtain a keyboard 
that contains a numeric keypad and utilize it. Think 
about it before you purchase your keyboard. 

I obtained my keyboard at a local electronics parts 
store bargain basement. It has eighty-five keys and 
included a prewired (printed circuit board) matrix. 
The prewired matrix turned out to be a real problem. 
It did not match the 400 matrix, and a lot of cutting 
and strapping on the printed circuit board was 
required. I have included the four function keys, a 
numeric keypad, and 1 am considering single 
keystroke operation of operations now requiring 
two or three keystrokes. 

At this point I would like to thank Joe Hafner of 
our Fort Wayne users group "ACORN." Joe 
provided me with a map of the ATARI 400 keyboard 
matrix. This saved me the time required to push each 
key and determine what pins were shorted. 

The next step will be to obtain the cable to extend 
the twenty-two pin connector to your new 
keyboard. I purchased a four-foot piece of twenty- 
four conductor ribbon cable. You might require a 
longer or shorter piece depending upon your 
requirements. I then made up an extension cord with 
a male connector on each end. This cable was made 



long enough to extend my keyboard to a typewriter 
shelf on my desk. The computer would remain on 
top of the desk, but could be placed at the back 
under a shelf. 

I then ran a short piece of ribbon cable into the 
rear of the computer through the vents. The cable 
was then soldered to the twenty-two pin connector 
on the mother board. I extended the cable about 
eight to ten inches from the rear of the computer and 
added a female connector. The twenty-two leads 
extended from the new keyboard were also 
terminated into a female connector. The jumper 
cable would then tie the two units together. 

By extending the cable out of the vent openings on 
the rear of the computer, no modification to case of 
the computer was required. If I decide to trade up to 
an 800, the modification will not impair my trade-in, 
as there will be no evidence it ever existed. 

I found that eight to ten inches of cable hanging 
out of the rear of the computer gave me plenty of 
slack when removing the case. Do not cut your 
cable any shorter than that amount. 

The connectors I chose were twenty-five pin "D" 
shield connectors. These connectors are used to 
provide data service in the telecommunications field. 
They are sometimes referred to as an RS-232 
connector. There are ribbon cable connectors you 
should consider and some of these are solderless. 
Soldering the small pins on the connectors I chose 
required three hands. My wife Nancy was kind 
enough to offer one of hers. 

The next step will be to wire the matrix on your 
new keyboard. Let us assume you have obtained 
your keyboard. It is sitting in front of you, and you 
suddenly realize the keys do not match the ATARI 
400 keyboard layout. Don't panic; your keyboard is 
the rule, not the exception. Your keyboard may not 
even contain all of the same keys as the ATARI 
keyboard. 

The answer to the biggest share of mismatches is 
the fact that the key caps will pop right off. You can 
exchange them or move them about as you wish. You 
now have two options. You can opt for a new system, 
or move your key caps around until you come as 
close as you can to the ATARI arrangement. 

The QWERTY system is said to be faster and 
more up-to-date. See Figures Three through Five for 
some examples of keyboard layouts. Give this some 
thought. Once you have decided on an arrangement 
and have wired the matrix it is not easy to change it 
without rewiring the matrix. 

After your keyboard is arranged you will probably 
have to re-label at least a few of your keys. There are 
several methods you can consider. If you are 
artistically inclined you can paint your own key caps. 
Use a non gloss type of paint. I didn't and I'm having 
some problems with reflections. Dry transfer 
lettering may also be used. A coat of sealer should be 
. sprayed over the keys to prevent the letters from 
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rubbing off. Or, if you want to purchase "regulation- 
style" keys, they may be ordered through Arkay 
Engravers, Inc., 2073 Newbridge Road, P.O. Box 
916, Bellmore, New York 11710. Phone (516)781- 
9859 or 781-9343. 
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PHOTO 1 



Keep in mind that you may not have to change 
some keys even if they do not contain the exact 
wording or character that you require. My return 
key only has an arrow on it. Once you start using 
your new keyboard you will not require a complete 
description on each key. What you see will mean as 
much as dual colors etc. 

You are now ready to wire your keyboard. You 
should have your key caps in their final arrangement. 
This arrangement cannot be changed once you have 
installed your keyboard without rewiring it. If you 
can label the keys on the underside of your 
keyboard, do it. This will be a big help when wiring 
your new keyboard,. The keyboard, when wired, is a 
matrix. When a key is pressed two points on the 
matrix are connected. Each key will have two 
terminals. They represent the point where the lines 
cross on the diagram. You will wire your new 
keyboard to match the ATARI 400 matrix in figures 
one and two. 

If you decide not to follow the ATARI 400 
keyboard arrangement you will have to be a little 
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more careful about what keys you tie to where. You 
do not have to worry about polarity, but using the 
same side of the keys for a certain line will make your 
job easier. 

I recommend using 28ga or lighter insulated 
strapping wire. The smaller the wire the neater the 
job. Most keyboards will require you to make solder 
connections. A twenty-five watt soldering iron with 
a very small tip will do the best job. Heat the 
connection and allow it, not the iron, to melt the 
solder. The solder should then be allowed to flow 
over the connection, giving it a thin coating. Be 
careful about dropping solder down into the keys. 

Carefully, by following the matrix prints 
provided, wire your keyboard to match the ATARI 
400 matrix. Remember to only bring out the twenty- 
two connections indicated on the drawings. You will 
then terminate the twenty-two lines into a connector 
of some sort. This could be mounted on your 
keyboard case, or terminated on the end of a short 
piece of cable. 
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PHOTO 2 

You will now tie the twenty-two conductor cable 
into the mother board of your computer. To do this 
you will have to remove the bottom cover of your 
computer and expose the mother board. Choose a 
clean, well-lit work area, and lay something down to 
protect the top of your computer from scratches. 

Remove the power cord from the computer and 
any peripheral devices you might have plugged into 
your computer. Remove the connections to your TV 
set also. Place your computer in front of you with the 
keyboard facing you. Now turn the computer over 
so that it is laying on its top with the bottom of the 
keyboard towards you. 

Remove the four screws holding the bottom of the 
case and remove it. Note how the RF lead is routed 
within the case. If it pulls free you will have to 
remember how it was routed to assemble your 
computer. 

Lay the cover aside and look carefully at what you 
have exposed. On the keyboard end of the computer, 
and on the left side you will find a short piece of 
ribbon cable. This ribbon cable extends from the 
keyboard to the twenty-two pin connector on the 



mother board. When you have located this 
connector you can see how it is soldered to the 
mother board. The twenty-two solder points you see 
is where you are going to attach the ribbon cable 
from your new keyboard. 

Look carefully at the connector side (component 
side) of the mother board. You may have to tip your 
computer up a little to see properly. On each end of 
the connector stenciled on the mother board you 
will find the numbers one and twenty-two. The 
number one will be towards the rear of your upside- 
down computer. 

This connector is where you will be attaching the 
piece of ribbon cable that was brought in through the 
vent slots on the rear of the case. You will be 
soldering the cable to the twenty-two points of 
solder on the foil side of the mother board. Be very 
careful not to bridge any of these points with solder. 
Carefully separate the conductors of your ribbon 
cable. I would suggest stripping and tinning the ends 
of the cable before soldering them to the mother 
board. Cutting the ribbon cable on an angle may help 
make routing it a little easier. I found my wife's third 
hand a necessity for the soldering of the cable to the 
mother board. 




PHOTO 3 

Carefully reassemble your computer and apply 
power to it. Plug in your new keyboard and prepare 
yourself for a real treat. As good as the ATARI 400 
monoplane keyboard is, there is no comparison to a 
"real" keyboard. I know of no modification to your 
computer that will give you as much in return as 
adding a keyboard will. 

I would think the Sinclair ZX81 could be modified 
just as easily. Once the matrix was figured out the 
rest would be real easy. Any comments, questions, 
or problems will be welcome. If you include a self 
addressed stamped envelope I'll be happy to answer 
your letter. 

Robert E. Meyer 

7315 Turkey Run 

Fort Wayne, Indiana 46815 
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Presents ATARI 

Software Specials 

18 to 25% off 

Our Guarantee: If it doesn't Boot, we will replace it free.... 
All stock items shipped within 48 hours 

Write for free catalog, many, many more titles. 



ADVENTURE INTERNATIONAL 

Adventure #1,2,&3 32Kdisk 39.95 

Adventure #4,5,&6 32Kdisk 39.95 

Adventure #7,8,&9 32Kdisk 39.95 

Adventure #10,1 1,&1 2 32Kdisk 39.95 

Starflight (Star Trek 3.5) 40K disk 24.95 

Lunar Lander 32Kdisk 24.95 

Commbat 24Kdisk 24.95 

Rear Guard 24Kdisk 24.95 

Preppie 32Kdisk 29.95 

War 32K disk 24.95 

Diskey 32K disk 49.95 

Adventure #1 -Adventureland 24Kcass 24.95 

Adventure #2- Pirate's Adventure . . . . 24K cass 24.95 

Adventure #3 -Mission Impossible. . . . 24Kcass 24.95 

Adventure #4 -Voodoo Castle 24Kcass 24.95 

Adventure #5 -The Count 24Kcass 24.95 

Adventure #6 -Strange Odyssey 24 K cass 24.95 

Adventure#7- Mystery Fun House . . . 24Kcass 24.95 

Adventure #8 -Pyramid of Doom .... 24K cass 24.95 

Adventure #9- Ghost Tovun 24Kcass 24.95 

Adventure #10 -Savage Island I 24K cass 24.95 

Adventure #11 -Savage Island II 24Kcass 24,95 

Adventure #12 -Golden Voyage 24Kcass 24.95 

Angle Worms/Crolon Diversion 8 K cass 14.95 

Deflection 8 K cass 14.95 

Sunday Golf 16Kcass 14.95 

Galactic Empire 32 K cass 19.95 

Galactic Trader 32K cass 19.95 

Starlight (Star Trek 3.5) 32Kcass 19.95 

Lunar Lander 24 K cass 14.95 

3DTicTacToe 16Kcass 14.95 

TreasureQuest 16Kcass 14.95 

Rear Guard 16Kcass 19.95 

Preppie 16Kcass 29.95 

BRODERBUND SOFTWARE 

Apple Panic 48Kdisk 29.95 

David's Midnight Magic 48Kdisk 34.95 

Track Attack 32Kdisk 29.95 

Star Blazer 32Kdisk 31.95 

Choplifter 48K disk 34,95 

Deadly Secrets Adv#1 48K disk 34.95 

Stellar Shuffle IBKdisk 29.95 

Apple Panic 16Kcass 29.95 

Stellar Shuffle IBKcass 29.95 

JV SOFTWARE 

Action Quest 16Kdisk 29.95 

Ghost Encounters 16Kdisk 29.95 

Action Quest 16Kcass 29.95 

Ghost Encounters 16Kcass 29.95 

K-BYTE 

K-DOS 32Kdisk 89.95 

K-Razy Shootout 8K cart 49.95 

K-Razy Kritters 8K cart 49.95 

K-Star Patrol SKcart 49.95 

K-Razy Antiks SKcart 49.95 



31.95 
31.95 
31.95 
31.95 
19.95 
19.95 
19.95 
19.95 
23.95 
19.95 
39.95 
19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
11.95 
11.95 
11.95 
15.95 
15.95 
15.95 
11.95 
11.95 
11.95 
15.95 
23.95 



23.95 
27.95 
23.95 
25.95 
27.95 
27.95 
23.95 
23.95 
23.95 



23.95 
23.95 
23.95 
23.95 



71.95 
39.95 
39.95 
39.95 
39.95 



ON-LINE SYSTEMS 

Hi-RES Adv#0- Mission Asteroid .... 40Kdisk 
HI-RES Adv#2- Wizard & Princess . . . 40K disk 
Hl-RESAdv #4- Ulysses and 

The Golden Fleece 40K disk 

Crossfire 32Kdisk 

Mousekattack 32Kdisk 

Ultima II 48Kdisk 

Jawbreaker 16Kdisk 

Threshold 40K disk 

Softporn Adventure 40Kdisk 

The Next Step 32Kdisk 

Frogger 32K disk 

Ultima I disk 

Crossfire 16Kcass 

Jawbreaker 16Kcass 

Frogger 16Kcass 

Crossfire 8K cart 

SYNAPSE SOFTWARE 

File Manager 800 4- 40Kdisk 

Disk Manager 32Kdisk 

Dodge Racer 32Kdisk 

Protector 32Kdisk 

Chicken 16Kdisk 

Nautilus 32Kdisk 

Slime 16Kdisk 

Shamus 16Kdisk 

PAGE 6 24K disk 

Syn Assembler 48Kdisk 

Apocalypse disk 

Raptilian disk 

Picnic Paranoia disk 

Claim Jumper disk 

Dodge Racer 16Kcass 

Protector 32K cass 

Chicken ISKcass 

Nautilus 32Kcass 

Slime ISKcass 

Shamus . IGKcass 

Apocalypse cass 

Raptilian cass 

Picnic Paranoia cass 

Claim Jumper cass 



24.95 


19.95 


32.95 


26.36 


34.95 


27.95 


29.95 


23.95 


34.95 


27.95 


59.95 


47.95 


29.95 


23.95 


39.95 


31.95 


29.95 


23.95 


39.95 


31.95 


34.95 


27.95 


39.95 


31.95 


29.95 


23.95 


29.95 


23.95 


34.95 


27.95 


44.95 


36.00 



99.95 


75.00 


29.95 


23.95 


34.95 


27.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


29.95 


21.95 


49.95 


39.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.97 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.95 


23.95 


34.97 


23.95 
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Data 



P.O. Box 652 
Natick, MA 01760 

617-655-0241 



ORDERING INFORMATION 

We accept Mastercard and Visa 

(Include Card No. and expiration 

date). 

Allow 2 weeks for personal and 

Corporation checks to clear. 

M.O. and certified checks shipped 

immediately. 

MA residents add 5% sales tax. 

Add $2.00 shipping in U.S. 

Extra: 

UPS Blue Label $3.00 

Canada shipping $6.00 

Overseas shipping . . . $10.00 



Write for free Catalog — many, many more titles. 
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CASSETTE OR DISK 32K 



by Bob Curtin 



DUNGEONS & DRAGONS is a great game, but 
totally aside from initially creating the dungeon and 
populating it with all manner of bane, beast, and 
treasure, it's an enormous amount of work for the 
Dungeon Master. In addition to dungeon-related 
information such as time, weather, etc., the DM is 
stuck with the formidable task of keeping the sta- 
tistics for a slew of characters accurately recorded, 
constantly updated, and easily accessible. It's not 
such a hot job for a human, but for your ATARI it's 
easy. Hence, the second and probably the most 
useful program in my D &. D utility series. 

This program will store and instantly display, on 
command, the statistics for up to ten characters. It 
also provides quick access to the data so it can be 
changed, if need be, as the game progresses. 

There're some other goodies, too. Are you tired of 
looking up an endless series of "to hit" members? 
Well, this program will do it for you. Each of the 
classes "roll" on their respective combat tables, with 
all of the hit modifiers, the character level, and the 
opponent's armor class taken into account. If a hit is 
scored, the computer will note the weapon being 
used and roll for damage, adding any damage 
modifiers. Those who are entitled to more than one 
attack per round will automatically be given that 
opportunity. 

There's also a mode for keeping track of time. 
Minutes, hours, days, months, and years can be 
preset and then updated (no pun intended) as your 
game sessions roll by. Wind, weather, and temper- 
ature are all taken care of, with each of these 
changing as the months pass; that is, rain will turn to 
sleet or snow, and the temperature will drop as the 
winter months go by, and vice-versa in the summer. 

I've also included a routine which allows the DM 
to generate random numbers from one to any 
magnitude chosen. This little item is handy for 
checking random occurences unbeknownst to your 
players. As you well know, the sound of a rolling die 
is sometimes enough to spoil a surprise. 

Finally, I've provided the means for filing and 
retrieving all of this data on cassette so you'll only 
have to input all of those character statistics one 
time. 

After you've typed in the code, RUN it and wait a 
few seconds for the combat tables to load into 
memory. You'll then be asked, "How many 
players?" Simply enter the number of players in your 
dungeon. Bear in mind that you can use this program 



to keep track of important non-player characters as 
well. If you do, include them in the number of 
players. 

A menu will then be displayed, giving you a choice 
of several commands. These are actually program 
modes which I'll explain one by one. 

Below is a handy table showing the different 
modes and the choices and commands in each mode. 
Don't be afraid to experiment. I guarantee that once 
you've used this program for awhile you'll never go 
back to pencil and paper. 

MELEE 

The first item on the menu is melee, or combat. It 
is done in rounds with the lowest numbered player 
or character starting, and then progressing se- 
quentially to the highest numbered character. Those 
characters with more than one attack are automat- 
ically given the correct number of additional attacks. 
Note that only those characters with prepared 
weapons are given attacks. Those who don't are 
given the choice of preparing a weapon instead, or 
passing play on to the next player. To prepare a 
weapon, simply enter the weapon number when it's 
asked for, or enter zero if no weapon is to be 
prepared. 

As I said before, if an attack is to be made, the 
computer will ask for the opponent's armor class. 
Once entered, the computer will check to see what 
the character class is, and the character's level. It'll 
then fetch the correct "to hit" number from the 
appropriate combat table, roll the dice, add any hit 
modifiers, and check the results. If a hit is made, it'll 
then check to see which weapon was used, roll the 
dice for damage, add any damage modifiers, and 
display the results. 

Characters who've been killed or rendered 
unconscious will automatically be passed, and 
play given to the next eligible player. 

Entering " U " will pass play to the next player and 
entering "12" will return the program to the 
command menu. 

CHARACTER SHEET 

By pressing any number from to 9, the cor- 
responding numbered player's character sheet will 
be displayed on the screen. This can be done either 
while the command menu is displayed, or while in 
the character sheet mode. A number of statistics can 
be changed while in this mode. For example, by 
pressing H, and entering the player's current hit 
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point level, the display will be immediately updated. 
All statistics which can be changed in this mode are 
those which vary the most often during the game, 
such as hit points, money, and weapon status. The 
rest can be changed in the Initialization mode. 

DUNGEON STATUS 

This display lists the time, date, and weather in the 
dungeon. The DM has no control over the weather 
display, but can change the date to whatever wanted. 
Pressing "1" will add ten minutes to the displayed 
time. Pressing "2" will add one hour to the displayed 
time, and a day will be added to the date by pressing 
"3". To return to the command menu, press "R". 

DICE 

Entering a number of any magnitude, including 
negative numbers, will generate a random number 
between that number and one, inclusive. By entering 
anything other than a number, the program will 
return to the command menu. 

FILE DATA and GET DATA 

Pressing "F" or "G" will conjure up the respective 
routines for saving or retrieving the data in memory. 
I made this a two-step process so that if either letter is 
pressed accidentally, you have a chance to override 
the command. Pressing "T" will initiate the 
command, and "N" will override and return the 
program to the command menu. 

INITIALIZATION 

Lastly, this mode is used to initially enter the 
player statistics, or change statistics, or add new 
players. Note that before any statistic or string is 
changed, you must specify the player number. Once 
the player is identified, however, any number of 
statistics can be changed without re-identifying the 
same player. 

A few words of clarification here. Each character 
may have up to five weapons in the program, 
numbered 1 to 5. Item number 22 asks for a number 
which is equal to the maximum damage which can be 
inflicted with that weapon, and will ask for each 
weapon. 

As the Dungeon Master, you have to do two 
things. First you must assign a number to each of the 
character's weapons, and second, enter the damage 
when asked. 

For example, let's say one character has three 
weapons; a crossbow, a longsword, and a dagger. 
We'll number them 1, 2, and 3 respectively. A 
longsword will do 1-8 hit points of damage, a dagger 
1 1-4, and a crossbow 1-6. Simply enter 6, 8, and 4 
for weapons 1, 2 and 3, and zeros for weapons 4 and 
5. 

Using this program will be awkward at first, but as 
the commands become second nature and your 
players get used to the speed and accuracy of the 
combat, I think you'll find it far better than reams of 
paper, countless tables, and countless dice rolls. D 



COMMAND TABLE 



MODE 


INPUT 


M 


-9 to 10 


MELEE 






1 to 5 




U 




12 


n 


to9 


CHARACTER 


M 


SHEET 


R 




G 




S 




C 




P 




E 




H 




W 


D 


tt 


DICE 





Any key 



s 

DUNGEON 
STATUS 


1 
2 
3 
R 


I 

INITIAL- 
IZATION 





RESULT 

Range of opponent's armor class 

(Input when requested) 

Weapon number (number entered is 

the number of the weapon to be 

prepared, enter when requested) 

Pass play to the next player 

Return to command menu 

Individual character sheet displayed. 

Go to MELEE (combat) 

Return to command menu 

Input gold pieces 

Input silver pieces 

Input copper pieces 

Input platinum pieces 

Input electrum pieces 

Input hit points 

Input weapon to be readied (1 - 5 = 

weapon readied) 



Number input will generate a random 
number between itself and 1 (in- 
clusive) Note that negative numbers 
may also be entered. 
Return to command menu 

Increment minutes by ten 
Increment hours by one 
Increment days by one 
Return to command menu 

Input player number first, then as 
many items as needed . Input items 
per handing. 



4 CROPHICS IrPOSTTIOH 4,12:P0KE 703,8: 

POKE 710,8;? tt6;"PLE05E HftlT":TPflP 200 

00 

10 DIM CTf20,18J,ftS<10) ,8S{10J ,CStl01, 

P$ClO5,ESC105,FSfiej,GStlOJ,HSfl0J,J$t 

18 J , K5 CIO J , YS C3J , ftC (10> , L CIO) , HP (10 J 

15 DIM GPtlO),SPC10),CPClOJ,PPfl0),EPC 
10) , HMCIO) , DMCIO) , R« CIO) , 5T CIO) , MH C103 
, HD C10, 5) , SWH CIO) , 5MD C10) , C CIO) , T C3) 

16 DIM ACA(ie),SBC10),HC10),ALSC2) 

20 DIM CMD$(5),INtl0},HIC10),DXClO),CN 
CIO) , CH CIO) , NS C2) , TS C5) , RS C5) . AftS C2) , B 
B$ C2) , CCS C2) , DDS C2) , EE$ C2) , FPi C2) 

22 DIM G6S C2) , HHS C2) , JJS C2) , KK5 C2) , HUM 
SC5),flMSC2),CLSC15),HOSC10),GESC7),GEC 
10) ,HEC10,2) ,MEC10) ,ftTTC10) .fllTlClO) 

23 ftMS="flM";TCl)=e:TC2)=0 

24 DIM GflSC12),GB5C12),GCSC12),GD$C12) 
,GLSC12),GFSC12),GHSC12),GISC12),GJSC1 
2),GK$C12) 

25 FOR E=l TO 18: FOR K=20 TO 1 5TEP -1 
:REftD N:CTtK,E)=H:IIEHT X:MEKT E:flCl=flC 
+? 

30 DflTfi 10,11,12,13,14,15,16,17,18,19, 

28,20,20,20,20,20,21,22,23,24,10,11,12 

,13,14,15,16,17,18,19,20,20,20,20,20 

35 DftTA 20,21,22,23,24,8,9,10,11,12,13 

, 14 , 15 , 16 , 17 , 18 , 19 , 20 , 20 , 20 , 20 , 20 , 20 , 2 

1,22,8,9,10,11,12,13,14,15,16,17,18 

40 DftTfl 19,20,20,20,20,20,20,21,22,6,7 

,8,9,10,11,12,13,14,15,16,17,18,19,20, 

20,20,20,20,20,6,7,8,9,10,11,12,13,14 

45 DATft 15,16,17,18,19,20,20,28,20,20, 

20,4,5,6,7,8,9,10,11,12,13,14,15,16,17 

,18,19,20,20,20,20,4,5,6,7,8,9,10,11 

50 DATA 12,13,14,15,16,17,18,19,20,20, 

20,20,2,3,4,5,6,7,8,9,10,11,12,13,14,1 

5,16,17,18,18,20,20,2,3,4,5,6,7,8,9 

5& DOTO 10,11,12,13,14,15,16,17,18,19, 

20,20,0,1,2,3,4,5,6,7,8,9,10,11,12,13, 

ii'i*ii®i^'''^^'^''8'l'2»3,4,5,6,7,8 

60 OflTfl 9,10,11,12,13,14,15,16,17,18,1 

2fr^^li5'i^'^^'~2'-l*0.1f2,3,4,5,6,7 
65 DflTO 8,9,10,11,12,13,14,15 16,17,-4 
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,-3,-2,-1,0,1,2,3,4,5,6,7,8,9,10,11,12 

,13,14,15,-4,-3,-2,-1,8,1,2,3,4,5,6,7 

70 DATA 8,9,10,11,12,13,14,15,-6,-5,-4 

,-3,-2,-1,8,1,2,3,4,5,6,7,8,9,10,11,12 

,13,-6,-5,-4,-3,-2,-1,0,1,2,3,4,5,6 

75 DrtTft 7,8,9,10,11,12,13 

80 fll=l : rOOnai-ftl : o?=fil+Al : A3=fl2+ftl : 04= 

03+01 :fi5=ft3+fl2:ft6=fl5+ftl:fl7=05+fl2;ft8=ft4 

+04:09=05+04:010=05+05:011=06+05 

85 012=02*06 : 013=06+07 : 014=02*07 ! 015=0 
3*05 : 016=02*08 : 017=09+08 : 018=03*06 : 019 
=018+09 : 028=018*02 : 025=05*05 

86 050=025+025:0108=050+058 

89 GR0PHIC5 0:TROP 89;P0KE 710,128:POK 

E 752,01;? "H'MPOSITIOH 011,012:? "tHO 

M MOMV PL0VER5-J :INPUT HUH: N1JM=NUM-01 

95 IF NUM>=00 THEM IF NUM<010 THEM 900 

8 

ISO ? ■'«":FOR P=00 TO NIIM:' : POKE 710, 

050:P0KE 709,050+018 

A51 IF HPCP}<=00 THEM IF HPCPJ>-010 TH 

EM ? "GDEHia ";P;" 15 UNC0M5CI0U5" : ? : 

GOTO 310 

152 IF HPCPX-09 THEM ? "IdlMMd ";P;" 
H05 BEEM KILLED.":? :G0T0 318 

153 ? ,," 11 = PASS":'' ,," 12 = 
RETURN" 

154 TROP 20000:? "[313311] "JP:? "DEFEMD 
ER'S ORMOR CL0S5"; :IMPUT OC:TROP 40008 
:0=Oe:IF 0C=012 THEM GOTO 9000 

155 IF 0C<=018 THEM IF 0C>=-09 THEM 0= 
05 

163 IF 0C=011 THEM ? :G0T0 318 

164 IF 0O05 THEM ? "QTRV 0G0IM.":F0R 
1=01 TO 0100*05 :NEKT I:? ■■H":GOTO 154 

165 IF M(P}=00 THEN ? "PLOVER "JP;" DO 
ESM"T HOVE WEAPON REODY":? "WEOPOM"; 
:IMPUT M:IF M<AO OR U>05 THEM 165 

166 IF HCP)=8 THEM HCPJ=M:GOTO 310 

200 IF C(PJ=01 OH CfPJ=02 OR CCP)=03 T 
HEN 0Cl=AC+iO:H=CTtOCl,LCP)} :GOTO 308 
285 IF C(PJ=07 OR CCP}=A8 THEM 219 
206 IF CCP>=09 OR C<PJ=O10 THEM 229 

210 IF LCPJ=03 OR L(P3=A4 OR LCP)=05 T 
HEM D=-l 

211 IF LCP>=06 OR LtP3=07 OH LCP)=08 T 
HEM D=-02 

212 IF LfP)=09 OR L(P)=010 OR LCP)=011 
THEM D=-03 

213 IF LCPJ=A12 OR LCP>=013 OR L<PJ=01 
4 THEM D=-04 

214 IF LCP)=A15 OR L(P>=A16 OR LCP>=A1 
7 THEM D=-A5 

215 IF L(PJ=A18 THEM D=-06 

216 OCl=OC+10:Dl=LCPJ+D:H=CTtOCl,Dl) :G 
OTO 380 

219 IF L(PJ<03 THEM D=08 

220 IF LtP)=03 OR LCP3=04 OR L(P)=A5 
R L(PJ=06 THEM D=-02 

221 IF L(P>=07 OR L(PJ=A8 OR LCP)=A9 
R LCP3=A18 THEM D=-04 

222 IF L(P)=011 OR LCP>=012 OR L (PJ =01 
3 OR LCP3=014 THEM D=-06 

223 IF L(PJ=015 OR LtP)=A16 OR LCP>=A1 
7 OR LtPJ=A18 THEM D=-A8 

224 D1=L(PJ+D:AC1=0C+010;H=CTC0C1,D1) : 
FOR E=01 TO 08: IF D1=E THEM H=H+01 

225 MEKT E:GOTO 380 

229 IF LtP5<03 THEM D=08 

230 IF LCPJ=03 THEM D=-01 

231 IF HP)=A4 OR LCPJ=A5 OR LCPJ=06 
R LfP3=07 THEM D=-03 

232 IF LCPJ=08 OR LCP>=09 THEM D=-04 

233 IF LfPJ=010 OR LCPJ=OH OR LCPJ=01 
2 THEM D=-06 

234 IF LfPJ=013 OR LtP3=A14 THEM D=-A8 

235 IF LCPJ=fll5 OR L(PJ=016 OR LtPJ=01 
7 THEM D=-09 

236 IF LtPJ=018 THEM D=-018 

237 D1=HP}+D:0C1=0C+018:H=CT(0C1,D1J : 
FOR E=01 TO 018: IF D1=E THEM H=H+01 

238 MEHT E:FOR E=016 TO A18:IF D1=E TH 
EM H=H+01 

239 NEXT E 

300 SMIMG=IMT <A20*RMD t AIJ +01 J +HM CP) +MH 
tP):? "H=";H:? "5mHG="j5WIMG 
305 IF SI«:MG>=H THEM DOM=IMT tWD tP, MCPJ 
J«HMDC01)+013+OHtP) :? "0 HIT!":? "DOMO 



GE=";0OM;" HIT POINTS" 

387 IF 0TTlfP)=02 THEM OTTl tP) =08 : GOTO 

151 
308 IF 0TTCP)=02 THEM IF OTTl (P3 =08 TH 
EM OTTl tPJ =02: GOTO 318 
389 IF 0TTltP}=A3 THEM 0TT1CPJ=02 
310 MEHT P:T t02J=TC023+01:F0R J=Oe TO 
MUH:IF ATTlCJJ=Ae THEM OTTl (JJ =OTT f J) : 
MEKT J 

312 FOR E=01 TO 5O0:MEKT E:GOTO 9888 
1088 ON P+01 GOTO 1005,1018,1815,1828, 
1825,1030,1035, 1048,1845,1858 
1005 INPUT GOS: RETURN 
1010 INPUT GBS: RETURN 
1015 INPUT GCS:RFTI1RN 
1020 THPUT GD$:RETURN 
1025 INPUT GL$:RETURM 
1030 INPUT GF$:RETURM 
1835 IMPUT GHS: RETURN 
1040 IMPUT GI$: RETURN 
1045 INPUT GJ$:RETURM 
1850 INPUT GKS:RETURM 

2808 ON P+1 GOTO 2885,2818,2815,2820,2 
025, 2030 , 2835 , 2840, 2845 , 2850 
2805 ? "+n^ ";GO$:RETURM 
2810 ? "♦►►> ";GBS:RETURM 
2815 ? "flf^^ ";GCS:BETURM 
2828 ? "ft>> ";GDS:RETURM 
2825 ? "t*>\ "JGL$:RETURM 
2838 ? "tH^^ ";GFS;RETURM 
2835 ? "-f^M " J GH$: RETURN 
2048 ? "in* ";GIS: RETURN 
2845 ? "*►►!► ";GJS;RETURM 
2050 ? "t^M ";GK$:RETURM 

3000 ? "R":P05ITI0N 8,11:? "Q 500051 

HH"':POSITION 8,12:? "ORE YOU SURE?":OP 
EM ttl,4,0,"K:":GET ttl,J:CL05E ttl 

3001 IF CHRSCJJ="Y" THEN 3004 
3082 IF CHRS(J)="N" THEM 9880 

3003 GOTO 3000 

3004 TS=CHRStl55) ;? "R";POSITIOM 08,01 
l:? "QPLEOSE CUE THE T OPE AMD":POSITIO 
N 8,12:? "PRESS l:U<ll:):i WHEN READY." 

3005 OPEN ttl,8,0,"C:":F0R J=A1 TO AlOO 
+020+08:PUT ttl,0:MEHT J 

3010 FOR E=A0 TO NUM:PRINT ttl;ACtEJ;T5 

;CCEJ ;T$jHPCEJ jTS;H«tEJ;TS;DM(EJ;TS;RO 

CEJ 

3012 PRIMT «1;ACACE>;TS;SBCE};TS;LCE1 ; 

T$; ST tE3 j TS J IN tEJ j TS : MI (E) ; TS ; DK CEJ 

3815 PRIMT «l;W{E> :TS,-GP<E) :TS;SPtEJ ;T 
$,-CPCEJ;TS;PP(E3;T5;EPCE3 jTS;CN(E3 

3816 PRIMT ttl:CH<E3;TS;0ITCEJ :T5:WEtE3 
;tI;HE(E,83;T5jHECE.13jTSjGECP3 :MEKT E 

3017 PRIMT ttl:OOS;TS:BBS;TS;CCS;T5;DD5 
;TS;EE$jTS;FF5;TSjGGS ^ , 

3018 PRIMT ttl:HHS;TS;JJS;TS;KKS:T5:0S; 
TS;BS;T$;C5;tS;D$jTSjE5jTSjFS;TS;G§ 

3020 PRIMT ttl;HS;T5;jS;TS;KS;TS;Z;TS,"M 
;TS;E:TC13=E ^ , 

3021 PRIMT ttl; J:Tt2J=J:PRIMT ttl;0M5;T5 
■ Y 

3022 FOR J=01 TO 05: FOR E=O0 TO MUM: PR 
INT ttl ; MD f E, J3 : MEKT E:MEHT J ^ ^ ^ 
3025 PRINT ttl:60S;TS:GBS;TS:GC5;TS:GDS 
;TS:GLS;TS;GfI;T$;GHSj:TSjGISjTS;GJS;TS 
;GKS 

3830 CLOSE ttl; END _^ , 

3500 ? "IS":P0SITI0M 8,11:? "Q tH^^MHi-li 
EH": POSITION 8,12:? "ARE YOU 5URE?":0P 
EH ttl,4,0,"K:";GET ni,J:CL0SE ttl 

3501 IF CHRSfJ3="Y" THEM 3505 

3502 IF CHR5fJ3="M" THEM 9000 

3503 GOTO 3500 

3505 ? "IS":POSITION 08,011:? "PLEOSE C 
UE T HE TOP E OHD" ; POSITION 08,012:? "PR 

ESS annaCD when ready- 

3586 OPEN tt3,4,0,"C:":F8R J=A1 TO 0188 
+028+08: GET tt3,R:MEKT J 

3587 FOR E=O0 TO MUM:IMPUT tt3,J:0CCE3= 
J: IMPUT tt3,J:CCE3=J:IMPUT tt3,J:HPCE3=J 

:IMPUT tt3, J:HM(E3=J:IMPUT tt3,J:DMtE3=J 
3508 INPUT tt3,J:ROCE3=J:IMPUT tt3,J:ACA 

CE3=J:IMPUT tt3, J;SBCE3=J;INPUT tt3,J:LC 
E3=J:IMPUT tt3,J:STCE3=J . ..^, 

3589 IMPUT tt3,J:IMtE3=J:INPUT tt3,J:WIt 
E3=J:1MPUT tt3,J:DKtE3=J:INPUT tt3,J:MCE 
3=J:IMPUT tt3,J:GPCE3=J 
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3511 IHPUT lt3,J:5P(E)=J:IMPUT tt3,J:CPt 
EJ=J: INPUT tl:3, J:PPtEJ=J:IMPUT «3,J:EPC 
E)=J: IHPUT t»3, J:CMCE}=J 

3512 INPUT tt3,J:CH(EJ=J:IHPUT »3,J:ftTT 
CEJ=J:IMPUT tt3,J:WE<E3=J:IMPUT tt3,J:HE 
tE,03=J:INPUT tt3, J:HECE,1J=J 

3514 IHPUT lt3,J:GECE>:=J;HEXT E 

3516 IHPUT M:3;A0S,BB$,CCS,I>I>SjEES,FFS^ 
GG5,HHS,JJS,KKS,fiS,BS,CS,DS,ES,FS,GS,H 
5, J5,KS,Z,H,T:T(1J=T 

3517 IHPUT l»3;K:Tt2>::K: IHPUT «3;0M5,Y 
3520 FOR J=l TO 5:F0R E=8 TO HUM: IHPUT 

tt3;Vn>:MDCE,J)=WD:HEKT E:HEXT J 
3522 IHPUT «:3;GftS,GB5^GC5,GDS,GLS.GFS, 
GHS,GIS,GJS,GKS 
3525 CL05E tt3:G0T0 9800 

4000 ? "HI PLOVER HUMBER"," 12 GEHDER" 
:? "2 PLftVER HflME","13 HEIGHT":' "3 CL 
fl5S"," ","14 HEIGHT" 

4010 ? "4 flLIGHMEHT"/'15 LEVEL":? "5 5 
TREHGTH","16 ARMOR CLASS":? "6 IHTELLI 
GEHCE","17 HIT MODIFIER" 

4020 ? "7 WISDOM"," ","18 DAM MODIFIER 
":? "8 DEKTERITV","19 AC ADJUSTMEHT" : ? 

"3 CONSTITUTION", "20 R/A BOHUS" 
4030 ? "10 CHARISMA", "21 ATTACKS/ROUHD 
":? "11 RACE"," ","22 WEAPON":? " ",," 
23 MONTH" 

4835 ? ,,"24 YEAR":? "*25 RETURN TO ME 
NU" 

4100 POSITION 3,17:? "HEADING HUMBER"; 
:INPUT I:IF Kl OR I>25 THEH 4008 

4185 POSITION 22,18 

4186 ON I GOTO 4110,4115,4120,4125,413 
0,4135,4140,4145,4150,4155,4160,4165,4 
170,4175,4180,4185,4190,4195,4200 
4107 OH I-A19 GOTO 4285,4210,4215,4285 
,4298,4295 

4188 GOTO 4000 

4110 ? "tPLAYER HUMBER"; : INPUT P 

4112 IF P<AO OR P>A9 THEN ? "tO TO 9, 
PLEASE - TRY AGAIN":FOR ErAl TO A58:NE 
XT E:? "f":? :GOTO 4110 

4113 IF P-A1>NUM THEN HUM=P-A1 

4114 GOTO 4000 

4115 ? "f PLAYER HAME";:OH P+Al GOSUB 6 
000,6805,6018,6015,6820,6025,6030,6035 
,6848,6845:6010 4080 

4120 ? "f CLASS"; : GOSUB 5500:6010 4000 

4125 ? "tALIGHMENT"; : IHPUT ALS:G0SUB 5 

008: GOTO 4088 

4130 ? "fSTRENGTH"; :IHPUT E:5TfPJ=E:G0 

TO 4080 

4135 ? "flHTELLIGENCE"; :INPUT E : IH CPJ = 

ElGOTO 4000 

4148 ? "fWISDOM"; : IHPUT E : WI tPJ =E : GOTO 

4008 
4145 ? "fDEHTERITY"; :IHPUT E:DXCPJ=E:G 
OTO 4000 

4150 ? "tCONSTITUTION"; :INPUT E:CNCP}= 
E:GOTO 4000 

4155 ? "^CHARISMA"; : INPUT E:CHCP1=E:G0 
TO 4888 

4160 ? "fRACE"; :GOSUB 1000:G0T0 4000 
4165 ? "tGENDER";.:INPUT GE5:IF Ge3 = "M" 

OR GES="MALE" THEN GEfP}=l:GOTO 4808 
4167 IF GE$="F" OR GES="FEMALE" THEN G 
E(P)=2:G0T0 4088 

4178 ? "^HEIGHT CFEET3 ";: INPUT J:HEtP, 
OJ=J:POSITIOH 29,19:? "t CINCHES> "; :INP 
UT J:HEtP,l)=J:GOTO 4088 
4175 ? "tWEIGHT"; : IHPUT J : WE (PI =J : GOTO 

4088 
4180 ? "tLEUEL"; :INPUT E :L tPJ=E :GOTO 4 
088 

4185 ? "tARMOR CLASS"; : INPUT E:ACCP>=E 
:GOTO 4888 

4190 ? "♦HIT MODIFIER"; : IHPUT E:HMCPJ= 
E:GOTO 4000 

4195 ? "tDAMAGE MODIFIER"; : INPUT E:DMC 
P)=E:GOTO 4088 

4280 ? "tAC ADJUSTMENT"; : IHPUT E:ACACP 
1=E:G0T0 4800 

4285 ? "tR/A BONUS"; :IHPUT E:RACP)=E:G 
OTO 4888 

4210 ? "f ATTACKS/TURN"; : IHPUT E: ATT CPJ 
=E:G0T0 4000 



4215 ? "tWEAPOH DAMAGE":? "^mWEAPOH tt 
l"j:IHPUT E:MDCP,A1J=E:? "4-»MEAP0N tt2" 
; : IHPUT E:WDfP,A2)=E 

4270 ? "»*MEAPOH tt3";:INPUT E:MDCP,A3) 
=E:? " WEAPON «4";:IHPUT E:WDCP,A4)=E 
4280 ? " WEAPON tt5"j;INPUT E:MDtP,ft5J 
=E:GOTO 4000 

4285 ? "f MONTH"; : IHPUT M:GOTO 4008 
4290 ? "fYEAR"; :INPUT Y:GOTO 4000 
4295 GOTO 9080 
5080 IF P=A8 THEH AAS=ALS 
5802 IF P=A1 THEN BB$=ALS 
5804 IF P=A2 THEH CCS=ALS 
5806 IF P=A3 THEH DDS=ALS 
5088 IF P=A4 THEH EE5=ALS 
5810 IF P=A5 THEH FFS=ALS 
5012 IF P-A6 THEH GGS=AL5 
5814 IF P=A7 THEH HHS=ALS 
5816 IF P=A8 THEH JJS=ALS 
5818 IF P=A9 THEH KKS=ALS 
5820 RETURH 

5580 IHPUT CLS:IF CLS="FIGHTER" OR CL5 
-lip. I TTHEM C(PJ=A1 

5505 IF CLS="RAHGER" OR CLS="R" THEN C 
CP3=A2 

5510 IF CLS="PALADIH" OR CLS="P" THEH 
CtPJ=A3 

5515 IF CLS="CLERIC" OR CLS="C" THEH C 
(P5=A4 

5520 IF CLS="DRUID" OR CLS="D" THEH CC 
P3=A5 

5525 IF CLS="MOHK" OR CLS="M" THEH C CP 
J=A5 

5530 IF CLS="THIEF" OR CLS="T" THEN Cf 
PJ=A7 
5540 IF CLS="ASSASSIN" OR CLS="A" THEN 

C(P3=A8 
5545 IF CLS="MAGIC-USER" OR CLS="MU" 
R CLS="MAGIC USER" THEH CtPJ=A9 
5550 IF CLS="1LLUSI0HIST" OR CL$="I" T 
HEN C(P)=A10 
5555 RETURH 
6888 INPUT AS:RETURH 
6005 IHPUT B5: RETURH 
60^0 INPUT CS:RETURN 
6015 INPUT DS: RETURN 
6820 INPUT ES:RETURH 
6025 INPUT F£: RETURN 
6830 INPUT G$:RETURN 
6835 IHPUT H$: RETURH 
6840 INPUT J5:RETURN 
6845 INPUT K5: RETURH 

7880 F = INT (A10e«RND (Al) J +A1 : E=INT (30»R 
HD(A1]}+A1 
7001 AMS="AM" 

7802 OH M GOTO 7003,7003,7004,7004,700 
4,7085,7005,7005,7005,7004,7004,7003 
7083 X=INT(A25«RND(A1}) ;GOTO 7008 

7004 K=IHTCA25*RHDtAi3+A25) :G0T0 7008 

7005 X=IHTt33«RNDtAlJ+60} :G0T0 7008 
7808 DL=PEEK(560)+256»PEEKC5613 :B=PEEK 
CDL4A4) :C=PEEKfDL+A5) :POKE 559, AO: POKE 

DL+A4,B:P0KE DL+A5,C:P0KE DL+A3,66 
7089 POKE DL+A6,A6:P0KE DL+A7, A6 :POKE 
DL+A13,A6:P0KE DL+A14, A6 :POKE DL+A15,A 
6:P0KE DL+A16,A6:P0KE DL+29,65 

7010 POKE DL+38,PEEKt56e3 :POKE DL+31,P 
EEKC561) :POKE 559,34:P0KE 710,128:P0KE 

712il28:? "R* DUNGEON STATUS":? 

7011 IF DrA3 THEH D=AO:GOTO 7015 

7812 IF X<30 THEH IF F<=60 THEN IF A>= 
108 THEH ? "f WEATHER: SHOW ":D=D 
+l:GOTO 7025 

7013 IF X>=30 THEH IF K<=34 THEH IF F< 
=60 THEN IF A>=ie0 THEN ? "tWEATHER: 
SLEET ":D=D+l:G0T0 7025 

7814 IF F<=60 THEH IF A>=100 THEH ? "* 
WEATHER: RAIH ":D=D+1:G0T0 7025 

7815 IF F>3e THEH ? "WEATHER: FAIR": 
D=8:A=e:G0T0 7025 

7828 IF F<=38 THEN ? "WEATHER: CLOUDY" 

:LET A=A+188 

7825 ? "WIND: ";E;"MPH" 

7846 ? "TEMPERATURE: ";X 

7850 ? "** DUHGEOH TIME" 

7053 ? "*YEAR : ";Y:? "MOHTH: ";M:? "D 

AY : ";Z:? :? "TIME : ";TtAlJ; ;TfA 
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7ie0 J=aO:OPEN »1,4,0,"K:":GET ttl,J:CL 
05E ttlrIF CHR$fJJ="R" THEN 9888 
7185 IF CHRf(JJ="l" THEM 7115 

7112 IF CHR5(JJ="2" THEM T Cftl)=T fftl J +0 
l:G0TO 7128 

7113 IF CHRSCJ)="3" THEM Z=Z+A1:G0T0 7 
128 

7114 GOTO 7108 

7115 TCfl2J=Tffl2J+UftLtCHRSCJJJ«ftl0 
7128 IF Tfft2J>=6e THEM T CA2J =TCA2J -68 : 
Tfftl)=Ttfll3+ftl 

7125 IF TtfilJzftll THEM TCA3]=A3 

7138 IF TCftl3=ftl2 THEM IF T tfl3J =fl3 THE 

N IF iflM$='"fiM" THEM ftM5="PM" : T Cfl31 =68 :G 

OTO 7145 

7135 IF TCfllJ=A12 THEM IF Ttfl3J=A3 THE 

N IF aHS="PM" THEM flMS="flM" : Z=Z+ftl ! T (ft 

3)=oe 

7145 IF T<ftlJ=fil3 THEM TtAlJ=Al 

7158 IF Z=31 THEM Z=A1:M=M+A1 

7155 IF M=A13 THEM M=A1:Y=Y+A1 

7175 GOTO 7808 

8858 DL=PEEK (5681 +256«PEEK 15611 :B=PEEK 

(DL+43 :C=PEEKtDL+5S :P0KE 559j0:POKE DL 

+4,B:P0KE DL+5,C:P0KE DL+3,66 

8855 POKE DL+12j7:P0KE DL+13,7:P0KE DL 

+14,7:P0KE DL+15,7:P0KE DL+23 , 65 : POKE 

DL + Z4^PEEKC5e8] :POKE DL+25, PEEK (561 J 

8868 POKE 559,34:P0KE 87,8:P0KE 718,19 

2:P0KE 712,192 

8865 TRAP 9888:? "H" : P05ITI0M 2,8:? "R 

AMDOM NUMBER"; :IMPUT RN 

8878 ? "«": POSITION 2,8 :E=IMT (RN«RND(e 

J+IJ :? "NUMBER = "JE 

8875 FOR E=l TO 158:NEKT E:GOTO 8865 

9088 TRAP 20e00:GRAPHICS 8:P0KE 718,12 

8:P0KE 709,148:P0KE 752,1 

9881 ? "I^":P05ITI0N 8,5:? " > ►M = MELEE 
":? "►« - CHARACTER SHEET":? "H = DUN 
GEOH STATUS" 

9882 ? "►D = DICE":? ">F - FILE DATA": 
? "^G = GET DATA":? "H = INITIALIZATI 
ON":? "U4C0MMAMD?"; 

9887 TRAP 2888e:0PEM ttl, 4, 8, "K : " : GET tt 
1,CMD: CLOSE ttl 

9888 IF CHRS(CMD}="S" THEN GOTO 7888 

9889 IF CHRS(CMD>="D" THEN GOTO 8858 
9818 IF CHRS(CMD)="G" 

9812 IF CHR$(CMD>="M" 

9813 IF CHR$(CMDJ="I" 

9814 IF CHRS(CMDJ="F" THEM GOTO 3880 

9815 IF ASC(CHR5(CMD})<48 OR A5C(CHR$( 
CMD))>57 then 9008 

9816 IF UAL(CHRS(CMD3 3>=8 THEN IF UAL ( 
CHRStCMDJXll THEN P=UAL (CHRS (CMD) ) :G0 
TO 9505 

9188 ? "a":GOTO 9000 

9585 POKE 718, P*16 H0 : POKE 789, P»16 : ? 

"«**iai3EZI3";P;" 

9585 ON P+1 GOTO 9608,9681,9682,9683,9 
684,9605,9606,9607,9608,9689 

9510 ON C(PJ GOTO 9618,9611,9612,9613, 
9614,9615,9616,9617,9618,9619 

9511 ON P+1 GOTO 9808,9802,9804,9886,9 
888,9818,9812,9814,9816,9818 



9534 IF GE(P3=!2 THEN ? "t ► ► ^ 



FEMALE 



";CP(P> :G0SU 

";PP(PJ 
"jEP(P) 



THEN GOTO 3588 
THEN GOTO 158 
THEN GOTO 4880 



9512 ? "4ftRM0R CLASS 

fM^^ST ";ST<PJ 

9514 ? "HIT POINTS 

► MUM ";IH(P) 

9516 ? "HIT MODIFIER 

>>>>UT. ";HI(PJ 

9518 ? "DAMAGE MODIFIER 

";DX(P> 

"R/A BONUS 

■I ■ ^^ (p) 

"AC ADJUSTMENT 
tM>>CH ",'CH(P) 
9524 ? "5AUE BONUS 
9526 ? "LEUEL 
H HT ";HE(P,0> 
S(34J 
9528 ? "WEAPON READY 

MT "J ME (P) J "LBS" 
? "4G0LD 
? "SILUER 
:l THEM ? "+>►► 



^^HDX 
9528 ? 
^M^CN 
9522 •> 



9530 
9533 
E(P>: 



'jAC(PJ :? " 
";HP(PJ :? "f 
";HM(P) :? "f 
"jDM(PJ :? "t 
";RA(P) ;? "t 
";ACA(PJ :? " 



";SB(P1 
";L(Pi :? "t> 
......II •>jHE(P,ll;CHR 

";W<P) :? "t» 



";GP(PJ 
";SP(PJ :IF G 
MALE" 



9535 ? "COPPER 
B 2088 

9537 ? "PLATINUM 
9548 ? "ELECTRUM 
9599 GOTO 9708 

9688 ? A$:GOTO 9510 
9661 ? B$:GOTO 9518 

9682 ? C$:GOTO 9518 

9683 ? D$:GOTO 9518 

9604 ? ES:GOTO 9510 

9605 ? F5:G0T0 9518 
9686 ? GS:GOTO 9510 

9607 ? H$:GOTO 9518 

9608 ? J$:GOTO 9518 

9689 ? KS:G0T0 9510 

9610 ? "^►fFIGHTER":GOTO 9511 

9611 ? "M>tRANGER":GOTO 9511 

9612 ? "►►►tPALADIN":GOTO 9511 

9613 ? "M>tCLERIC":GOTO 9511 

9614 ? "►►►tDRUID":GOTO 9511 

9615 ? "►>>tMOMK":GOTO 9511 

9616 ? "^►KTHIEF":GOTO 9511 

9617 ? "^►tASSASSIM":GOTO 9511 

9618 ? "►^►tMAGIC-USER":GBT8 9511 

9619 ? "^►tILLUSIONIST":GOTO 9511 
9788 POSITION 3,22:? "COMMAND?"; : OPEN 
ttl,4,8,"K:":GET ttl,K:CLOSE ttl 

9782 IF CHR$(K3="M" THEN 158 

9784 IF CHRS(K)="R" THEN 9888 

9785 IF CHRS(K3="G" THEM 18888 

9786 IF CHR$CKJ="S" THEN 18818 
9707 IF CHRS(K3="C" THEN 10020 

9788 IF CHRS(X3="P" THEN 18830 

9789 IF CHRS(H3="E" THEN 18848 
9718 IF CHRS(XJr"H" THEN 18858 
9711 IF CHR5(K3="HI" THEN 18060 

9715 IF ASC(CHRS(X3 3<48 OR ASC(CHRS<X3 
3>57 THEN 9700 

9730 IF UAL(CHR5(XJJ>rO THEN IF UAL (CH 
R$(K33<10 THEN P=UAL (CHRS (X3 3 : GOTO 950 
5 

9740 GOTO 9708 

9880 POSITION 36,2:? AA$:GOTO 9512 
9882 POSITION 36,2:? BB$:GOTO 9512 
9884 POSITION 36,2:? CCS:GOTO 9512 
9886 POSITION 36,2:? DD$:GOTO 9512 
9888 POSITION 36,2:? EES:GOTO 9512 
9810 POSITION 36,2:? FF$ : GOTO 9512 
9812 POSITION 36,2:? GGS:GOTO 9512 
9814 POSITION 36,2;? HHS : GOTO 9512 
9816 POSITION 36,2:? JJS:GOTO 9512 
9818 POSITION 36,2:? KK$:GOTO 9512 
10808 ? " GOLD PIECES"; : INPUT J:GP(P5 
=J:GOTO 9585 

10018 ? " SILUER PIECES"; :IHPUT J:SP( 
P3=J:G0T0 9585 

10820 ? " COPPER PIECES"; : INPUT J:CP( 
P3=J:G0T0 9505 

18838 ? " PLATINUM PIECES"; : INPUT J:P 
P(P3=J:G0T0 9505 

10040 ? " ELECTRUM PIECES" ;: INPUT J:E 
P(P3=J:G0T0 9585 

18858 ? " HIT POINTS"; :INPUT J:HP(P3= 
J:GOTO 9585 

10868 ? " NHICH MEAPON"; : INPUT J:M(P3 
=J:GOTO 9585 

28000 ERLH=PEEK (1863 +256»PEEK (187) :? " 
QIHPUT ERROR — TRY AGAIM!":FOR E=l TO 
58:HEXT E:TRAP 20080:G0T0 ERLH 



DrCHECK DATA (see p. 29) 

4 DATA 621,56,475,843,295,218,855,977, 

162,94,315,515,163,447,55,6891 

68 DATA 105,299,229,794,587,978,0,487, 

27,791,151,482,819,662,202,6613 

163 DATA 585,865,671,525,685,289,283,5 

06,709,878,26,39,265,534,258,7218 

228 DATA 928,52,213,249,918,574,259,82 

, 954 , 479 , 868 , 546 , 985 ,462,783, 8184 

238 DATA 971,481,646,411,83,525,434,44 

3,669,99,112,148,92,110,179,5323 
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±•30 DftTfl 96,139,165,188,137,986,828,8 
08,824,812,835,816,833,821,837,8957 
2058 DOTA 825,285,698,678,998,785,488, 
884,146,238,419,2,653,564,980,8547 
3822 DftTfl 987,839,171,887,547,519,863, 
561,188,297,690,545,395,49,893,8343 
3516 DOTA 452,643,229,366,189,344,688, 
958,976,13,56,525,335,299,868,6781 
4110 DATA 296,45,996,723,785,583,542,5 
9,305,448,146,417,974,227,173,6559 
4167 DATA 633,515,474,43,283,160,888,3 
77 , 943 , 617 , 438 , 329 , 316 , 300 , 455 , 6611 
4295 DATA 36,138,51,347,162,87,358,179 
,95,393,206,961,802,565,688,5068 
5515 DATA 442,287,310,312,727,725,334, 
987 , 840 , 929 , 176 , 857 , 924 , 199 , 867 , 8916 
6835 DATA 938,196,887,707,585,741,92,5 
48 , 186 , 597 , 326 , 567 , 281 , 144 , 526 , 7241 
7814 DATA 929,735,139,37,438,77,893,28 
3,602,693,61,872,68,257,723,6799 
7130 DATA 832,869,816,789,111,43,687,6 
98,255,161,322,548,568,273,597,7569 
9007 DATA 133,507,628,288,279,465,602, 
912,525,205,216,565,364,586,588,6863 
9514 DATA 526,467,938,295,841,877,438, 
278 , 349 , 688 , 151 ,34,662, 676 , 927 ,8139 
9600 DATA 275,607,329,287,622,338,299, 
637,349,312,141,35,443,181,805,5660 
9615 DATA 43,767,269,552,815,377,463,5 
67,791,557,551,821,524,552,819,8478 
9715 DATA 183,619,892,340,580,221,370, 
687,229,372,615,247,406,217,869,6767 
18820 DATA 517,251,778,498,478,248,275 



A LrMITED 

NUMBER OF 

BACK ISSUES 

ARE STILL 

AVAILABLE 

A.N.A.L.O.G. 

ISSUES 2, 4, 6, 7, 8. 

$3.00 each 




ATARI SOFTXAAARE 




IF WE D ON'T HAVE IT...WE WILL G ET IT!!! 

FEATURING 

ADVENTURE INTERNATIONAL... ATARI INCORPORATED... ATARI EXCHANGE PROGRAM ARTWORX 
ARTSCI... AUTOMATED SIMULATIONS... ACORN SOFTWARE... AVALON HILL... ARCADE PLUS BUDGECO 
BRODERBUND... COMPUTER MAGIC... CAVALIER... DATASOFT... EPYX... EDUWARE GEBELLI INFOCOM 
IN HOME... INNOVATIVE... JV..L & S..K-BYTE... LIGHTIN... LJK... MEGASOFT... ON-LINE OPTIMIZED 
SYSTEMS... PDI... PRISM... ROKLAN... SENTIENT... SUBLOGIC... SIRIUS... SWIFTY... STRATEGIC SIMULA- 
TIONS... SYNCRO... SYNERGISTIC... SYNAPSE... VISICORP... UNITED SOFTWARE OF AMERICA VERSA 
CORP.... VOYAGER... ETC. ... 



LOW PRICES 



CHOPLIFTER $29.50 

RASTER BLASTER $25.50 

APPLE PANIC $25.50 

CANYON CLIMBER $25.50 

PREPPIE $25.50 

S.A.M $50.50 

ZORKIorll $33.50 

FROGGER $29.50 

CROSSFIRE $25.50 

STAR RAIDERS $35.50 

PACMAN $35.50 

MASTERCARD ijUll. , ^^ 

& VISA WELCOME .WM ihmhi 

PLEASE CALL OR WRITE FOR FREE 
CATALOG 





^^h\±mhi-^ 




A 

ATARI 
800 Computer 
with 48K 
(ATARI memory) 

CALL 

ATARI 

810 Disc Drives 




, - CALL 



6956 Indiana Avenue 
Suite 3 

Riverside, CA 92506 
(714) 684-3090 




JK 



ASK ABOUT COMBO SPECIAL 

Your complete source for all your programming needs 
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CREATING AN AUTORUN.SYS FILE 



16K Disk 



by John L. Eslary 



This program will create an AUTORUN.SYS file 
on diskette, permitting you to load and run a BASIC 
program automatically. 

Before typing the program in from BASIC look at 
LINE 650. This is not a clear screen character; it 
rings the buzzer. To enter it, press the ESC key. 
While holding down the CTRL key press 2. When 
finished typing in the program, save it to disk as a 
utility. 

Run the program. When prompted for a filename, 
enter it and press RETURN. When finished, it takes 
a few seconds, then the buzzer will ring. 

POINTS TO REMEMBER 

l.The first character in a filename MUST be an 
alphabetic character. 

2. Eight characters is the maximum length of a file 
name. 

3. You can add a three character extender to a 
filename; example: BASIC. PRO, PRO is the 
extender. 

4. You can have only the AUTORUN.SYS file on 
each disk. 

UNDERSTANDING THE PROGRAM 

LINE 10 dimensions A$, (PROGRAM 
FILENAME). BYTE is the length of A$. 

LINE 20 clears the screen and goes to a subroutine 
at 170. 

LINE 170 positions the cursor and inputs your 
program. 

LINES 171 to 180 converts the string A$ to 
ATASCII decimal numbers and prints them at LINE 
200, the 32's are spaces to make up the remainder to 
a length of 20. 

LINES 30 to 50 puts the screen editor in a special 
mode which reads the screen data and sends it to the 
BASIC interpreter, where it is made part of the 
program. 

LINES 70 to 150 reads the DATA statements and 
POKES them into locations 1678 to 1536. 

LINE 160 POKES location 1599 with the length 
of your programs filename. 

LINES 300 to 400 PEEKS at locations 1536 to 
1678; PRINTS them to the screen; puts the screen 
editor in a special mode; reads the screen and makes 
the DATA statements part of the program. 

LINES 600 to 650 opens the disk for write; reads 
DATA starting at LINE 410 and sends it to the disk 
with the PUT command. 



LINE 650 rings the buzzer to signal the end. 

I hope you enjoy using this program as much as I 
did writing it. If you have any questions or 
comments please feel free to write me and I will try to 
answer them. 
John L. Eslary 
P.O. Box 581 
New Cumberland, WV 26047 

1 RFM MKKKMKICKKKKKMMKKXKKMKKMKKXMKMM 



Z REM * 






nUT0BMN,5V5 

3 REM « O.H.iQ.L.O.G. COMPUTING US 

4 REM * BV JOHN 5. E5I, flRV 

5 REM « BOH 581 

6 REM » !?S!:f£!j!?5£SL5?!S„!?!j„gsgfZ 

10 DIM fl5C2.tJ,BVTE5t20J 
28 -> CHRSC125) IGOSUB 178 
30 POSITION 2,0 

35 POKE 842,13 

36 STOP 

40 POKE 842,12 

50 ? CHR5tl25) 

70 RESTORE 200 

80 FOR X.-1578 TO 1536 STEP -1 

90 READ ft 

95 IF K=1536 THEN POKE K,0:GOTO 120 

180 POKE K,fl 

110 NEXT H 

120 FOR B=1659 TO 1678 

130 ? PEEK(B) 

140 IF PEEKtBJ<>32 THEM 160 

158 NEXT B 

160 BYTES=LEN<ft5)+6;P0KE 1610,8-1-1536 

:POKE 1599, BYTES:? CHR$C125J 

167 GOTO 300 

178 ? "TYPE IN THE NAME OF YOUR PROGRfi 

M AND PRESS RETURN" : POSITION 2,4:INPU 

T AS 

171 ? CHRSC125) : POSITION 2,7 

172 ? "200 DftTft 82,85,78,34,68,58,"; 

173 FOR ftrl TO LEN(A$} 

175 ? ftSCCftSCft,fi)3;","; 

176 NEXT A 

177 FOR C=LENCrt$) TO 28 

178 IF C<13 THEN ? "32,"; 

179 IF C=13 THEN ? "32":? "COMT' 
N 

180 NFKT C 

210 DATft 0,243,228,76,246,60,246,51,24 

6,163,6,67,246,51,243,251,0,7,96,1 

228 DATA 168,155,169,178,104,3,26,157, 

286,165,232,3,26,157,205,165,6,105,174 

,72 

238 DATA 138,96,1,168,6,186,206,6,131, 

185,9,240,6,106,172,96,6,186,141,11 

240 DATA 169,6,112,141,6,169,6,111,141 

,67,169,247,208,282,200,6,107,153,205, 

177 

258 DATA 16,162,0,160,3,26,157,6,169,2 

06,133,3,26,189,232,3,26,157,107,169 

260 DATA 205,133,3,26,189,6,185,142,23 

2,244,208,232,232,232,5,240,69,201,3,2 

6 

278 DATA 189,0,162 

380 GOTO 338 

318 POSITION 2,0 

311 IF K=1679 THEN 680 

315 POKE 842,13 

316 STOP 



IRETUR 



3L? POKE 842,12 

320 GOTO 400 

330 LIHE-420 

340 FOB H=1536 TO 1678 

350 ? CHRS(125J :POSITIOM 2,7:? LIKEj;" 

DftTfl "; 

360 LIHE=LIHE+10 

370 FOR J=l TO 20 

375 IF XZ1678 THEH ? PEEK tK) ; ", 226, 2, 2 

27,2,0,6":? "CONT":GOTO 310 

380 IF J=20 THEH ? PEEK tXJ ; " ":? "COMT 

"IGOTO 310 

390 ? PEEKCXJ ;",•■; :K=X+l:HEXT J 

400 MEXT X 

410 DftTA 255,255,0,6,142,6 

600 TRAP 640:REST0RE 410 

610 OPEN ttl,8,0,"D:AUT0RUN.SV5" 

620 READ (:t:PUT ttl,0 

630 GOTO 620 

640 CLOSE ttl 

650 ? "Q" 



D:CHECK DATA (see p. 29) 



1 OOTft 507,1 
,178,958,759 
80 DATA 558, 
8,729,5,712, 
175 DATA 635 
1,552,87,735 
311 DATA 583 
63,221,253,6 
600 DATA 352 



58,357,193,524,203,519,863 

,204,743,658,906,7730 

333,587,886,436,676,903,25 

791,401,932,715,8922 

,739,16,936,912,740,381,39 

,912,260,782,290,8368 

,988,503,809,699,810,717,5 

32,898,852,443,919,9890 

,933,745,502,657,422,3611 



Introducing the 

BAYLIS BIG STICK 




• Arcade rough 

• Left or right hand models available 

• 7"x8"x3" 

• $39.95 suggested retoil 

The BAYLIS DIG STICK for Atari* and Vic-20® 
computers by R. Allen Daylis. 

Available at Computer Store Int'l. Glendale, 
CA and other fine dealers. 

Released Through |!^ torrey Engberg Smith Co. 
RO. Box 1075, Glendale, CA 91209 (210) 247-6464. 
Dealer end distributor inquiries welcome. 



ATARI' 



PAYROLL SOFTWARE 

FOR 

THE ATARI® 800™ 



Miles Payroll System™ is an advanced and comprehensive payroll accounting system 
designed for businesses today- Cumulative totals are maintained lor each employee, as well as 
complete reporting, check writing, and W-2 reporting. Some teatures include: 

• Random access file organization for fast updating of individual records. 

• Allows weekly, biweekly, semimonthly or monthly pay periods. 

• Completely menu-driven and user-friendly. 

• Regular, Overtime. Double time. Sick. Holiday, Vacation. Bonus and Commission eaming categories 

• Payroll deductions include Federal W/H Tax, State W/H Tax, City W/H Tax. FICA, SDI. Group 
Insurance and 3 user-defined deductions, 

• Tax sheltered annuity deduction capability for IRAs and other tax shelters. 

• State and Federal Unemployment Insurance maintained. 

• Complete file viewing and editing capability. 

• Maintains up to 50 employees. 

• Up to 10 user-defined Worker's Compensation classifications. 

• Federal Tax tables may be changed in only 1 5 minutes each year by user when IRS changes tax 

• Table method used for State and City Tax, allowing compatibility with any state's or city's tax. 

• Produces 15 different reports, including W-2 Forms Report. 

• Checks calculated and printed automatically. 

• PROGRAM ENABLING MODULE™ protects valuable payroll information from unauthorized users 

• 3 user-defined payroll deductions to accommodate customized needs such as savings, profit 
sharing, lax shelters, pensions, etc. 

• Pay period, monthly, quarterly and yearly cumulative totals maintained for each employee. 

• Automatic input error detection and recovery protects system from user-generated errors. 

• Easy-to-follow, detailed, and comprehensive user's manual and tutorial leads the user step 
by step allowing anyone with little computer experience to easily operate the package. 
Includes index. 

• Color, sound, and graphics utilized for user ease. 

• Maintains employee pay history. 

• Allows for manual payroll check writing, 

• Packaged in a handsome 3-ring deluxe pocketed binder with 3 diskettes and manual. 

• Reasonable price. 

See your local store, or contact Miles Computing. 

JL\ MILES COMPUTING 

/^«:|-, 7136 Haskell Ave. #204 

I <P lues Van Nuys, CA 91406 

•^ "■ (213)994-6279 

Atari is a registered trademark of Atari, Inc. 

Miles Compuling, MILES PAYROLL SYSTEM, PROGRAM ENABLING MODULE are lrademarl<s 

ol Miles Computing, Van Nuys, California. Not affiliated with Atari, Inc. 

$1 79-95. Requires 32K and two Atari* 810" disk drivers. Payment in U.S. funds required witfi 

order California residents add 6.5% sales tax. COD. or prepaymenl only. Dealer inquires 

welcome 



108 REN miMKMimmtKmcMwmcKKitKitiiKmcmcKmi 



lie REM » DISK DIRECTORY » 

129 REM » BV TOMMV BENNETT » 

130 REN ^ if 
140 REN « THIS PROGRAN MILL ALLOM * 
150 REN * YOU TO SEE THE PROGRANS ON « 
160 REN « A DISK QUICKLY AND EASILY. » 
170 REN « IT STOPS EVERY 17 FILES TO » 
180 REN » ALLOW YOU TO READ THE FILE » 
190 REN * NANES. « 
280 REN MKMItKIClCIIKKmiKICMmiimKllMKMKMllKICIC 
210 GRAPHICS e:SETCOLOR 2,4,4:SETC0L0R 

4,4,4:P0KE 752,1 
220 DIN A$C2e]:0PEN ttl,6,0,"D :«.«" 
230 POSITION 11,1:? "«*» DISK DIRECTOR 
Y fHHt" ; X=3 

240 TRAP 270: REN *** HATCH FOR EOF ««« 
258 INPUT ttl, A$: POSITION 12, K:? AS:K=K 
«l:IF K=20 THEN 300 
268 GOTO 250 
270 ? :? " HIT ANY KEY TO END.. 

II 

280 IF PEEK (7643 0255 THEN POKE 764,25 

SiGRAPHICS e:END 

290 GOTO 280 

300 ? !? ■' HIT ANY KEY TO CONTI 

NUE . • " 

310 IF PEEK (7643 0255 THEH POKE 764,25 

5:? "H":60T0 230 

320 GOTO 310 
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ATARI IN 1983 



by Lee Pappas 



It appears that ATARI is taking heed of the 
software problems encountered over the last few 
years. True, many of the newly announced products 
are games, however just as many educational and 
utility programs are planned for an early 1983 
release. 

Among the games are GALAXIAN, 
DEFENDER, QIX, and DIG DUG. All of these 
are faithful representations of their Coin-Op 
counterparts, and the first three should be released 
just about the time you are reading this. In another 
game, E.T. PHONE HOME!, the player assumes 
the role of Elliott as you try and find all the pieces to 
assemble a phone before E.T. is captured or expends 
all of his/her energy. All of these games are on ROM 
cartridges. 

EASTERN FRONT, the popular graphics war 
game by Chris Crawford, will be released on ROM 



cartridge with several skill levels included in this new 
version. STAR TRUX is set in a factory of the 
future. The player must load his spaceship with 
cargo while sorting among garbage, explosives, and 
all types of various items, before that the ship can 
safely take off. You are the Man of Steel in 
SUPERMAN III as you attempt to save cities from 
the mad clutches of an evil computer. Use your heat 
vision as you try and avoid Kryptonite missiles. 
These latter two games are also planned for cartridge 
release. 

ATARI'S SPEED READING course should also 
be out in December. This program is designed to 
improve the user's reading speed and productivity. It 
requires 16K, BASIC, 410 Recorder, and a joystick. 
It includes a workbook, 5 cassettes, and will retail for 
$74.95. JUGGLE'S RAINBOW is an interactive 
adventure structured to assist young children in 




by Mybtis Systems 

The Apprentice'" is a 4-axis robot arm available in KIT form. Its design 
allows expansion to 5 axes or more. 

Assembly time is typically 3-5 hours, requiring only simple tools and a sol- 
dering iron. IC sockets are provided. The robot is operated solely from 
the joyports of the Atari 400/800. 

The Apprentice™ may be controlled directly from the keyboard, or from 
software. A boot-and-run demonstration disk for 800's or a cassette 
for 400's is provided. Included for more extensive programming, is a 
printed source code listing compatible with valFORTH,1.1, available 
from Valpar International (see ad elsewhere in this issue). Compatibility 
with other FORTH's for Atari machines cannot be guaranteed. A printed 
listing of servo drivers and readers is provided in standard 6502 assem- 
bler mnemonics and MAY form the basis of user routines tor advanced 
programmers in BASIC.' 

The Apprentice '" should not be regarded as a toy. Since it contains parts 
which may move suddenly , eye protection should be considered. 
NeitherValpar International nor Myotis Systems assume any liability for 
bodily injury resulting from use of this productorfor damage to anydevice 
attached to this product. 

Created by t\/like White and Evan Rosen (co-author of valFORTH 1.1) 



MYOTIS SYSTEMS 

P.O. .Box 1 3568 

Tucson,. Arizona 85732 

(602)326-5306 



Apprentice™ KIT and complete documentation 

(specify disk or cassette, PLEASE!) $295.00 U.S. 

valFORTH 1.1 (24K disk systems ONLY) 

(Recommended but not required) $45.00 U.S. 

Plus Shipping and Handling 
VISA and MASTERCARD accepted ■ 

For detailed information including expected availability of 
versions for other computers, price of assembled kits, 
expandability, specs, etc., and the bumpersticker, . 

"Has your robot hugged you today?" 
send $1 and aSTAMPED, SELF-ADDRESSED envelope. 



valFORTH IS a trademark of Valpar Inlernational 



Atari IS a trademark ol Alan Inc. 
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preparing for school. This educational game helps 
develop practical skills for learning the alphabet, 
reading, and writing. JUGGLE'S HOUSE picks up 
where RAINBOW leaves off. Both of these require 
16K and either a 410 Recorder or 810 disk drive. 
Retail price is $29.95 each. 

FAMILY FINANCES replaces the Financial 
Management System which was pulled from the 
market in mid- 1982. This package is an easy way to 
keep detailed records of incomes and expenses to 
assist in establishing a budget (budget? what's a 
budget?). The first of two disks has a program to 
record household cash flows, the second diskette's 
program will establish a family budget. It requires a 
disk drive, 32K, and will retail for $49.95. 
TIMEWISE is a time management program that 
turns your computer into an electronic planning 
calendar. Future appointments may be made by 
time, day, item, or the program can list the user's 
specific schedule for a day, week, month, etc. $29.95 
on disk only — requires 32K. 

ATARIWRITER is a new word processor, this 
time on a cartridge! More details on this will soon 
follow. This program is scheduled for early 1983 
release and will list for $79.95. It will require only 
16K. 

ATARIMUSIC I is the first in the ATARI Music 



Learning Series and teaches notes, steps, keys, and 
major scales. This tutorial will be available on 
cassette or diskette for $49.95 and will run in 16K. 
Another cartridge first is MICROSOFT BASIC II. 
This ROM will run in 16K and also comes with a 
disk for additional access to utilities, a reference 
card, the Microsoft BASIC II User's guide and a 
reference manual. 

NEW HARDWARE 

New hardware to be released for the first half of 
the new year includes the 1020 40'Column COLOR 
PRINTER/PLOTTER. This compact unit has 16- 
color capability and can print in any 4 colors at a 
time — either text or graphics. I don't know at this 
time if any form of screen dump will function with 
the unit. A new 80 column printer, the model 1025, 
is a 40 character/second unit able to utilize roll or 
fanfold paper. Prices are rumored to be $299 for the 
1020 plotters and $549 for the new 80 column 
printer. A trackball is also planned for 1983 along 
with an updated program recorder, the 1010. 

A.N.A.L.O.G. will follow up on all of these 
products as they are released, and we will continue to 
keep you, our readers, up-to-date on all the new 
products from ATARI in the new year. D 



WHY PAY MORE? 

FOR ENTERTAINING SOFTWARE FOR YOUR ATARI 400/SOO* 

I 



All SOFTWARE AT LEAST 20%0FF RETAIL PRICES -ALL THE TIME! 30-40% OFF ON SPECIAL SALE SOFTWARE! 

I 

■ 

MORE THAN 100 DIFFERENT GAMES, SIMULATIONS, PUZZLES,* ADVENTURES FROM ARTWORX, ADVENTURE INTERNATIONAL, 
EPYX, AVALON HILL, ONLINE, DATASOFT. ARCADE PLUS. IDSI, GEBELLI & MORE! 



FREE CATALOG FREE NEWSLETTER FREE SHIPPING ON ORDERS OVER $150 • FREE MASTERCARD AND VISA USE MOST 
ORDERS SHIPPED SAME DAY RECEIVED OR NEXT DAY ONLY $2.00 SHIPPING AND HANDLING PER ORDER 



BOX 247 




NEW/ FLORENCE, PA n5S44 
(4^S)S35-SS7a 



PA residents add 6% sales tax 
•trademark of Atari Inc. 
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HAVE THE ATARI TYPE IT IN 



CASSETTE OR DISK 16K 



by Daryll Strauss 



This article demonstrates an easy way to 1 ) have a 
program that adds on to itself, 2 ) have random access 
file capabilities with only a cassette, and 3) have 
functions entered during the program used by the 
computer. These things are possible by POKEing 
ICAXl, or 842 decimal (all numerical references in 
this article will be in decimal). ICAXl is a control 
byte in the central input output chip (CIO). ICAXl 
tells the computer that the return key has been 
pressed. A " 12" in ICAXl means that return has not 
been pressed and a "13" means it has. A "12" in 
ICAXl is the normal state of this location and the 
computer waits for return to be pressed before 
continuing, but when a "13" is POKEd there, the 
computer goes on without waiting, as if return was 
contantly being pressed. By using this location, data 
statements could be added to a program to form a file 
or functions could be entered by the operator and 
then used by the computer. For example, in Graph- 
It, when a function is entered, the program changes it 
into a line and then graphs that function. 

When you POKE 842,13 the cursor goes down 
the screen entering all the lines it encounters. If the 
screen is clear it enters nothing, but if a statement is 
encountered, it is entered as if it were typed in and 
return had been pressed. POKEing ICAXl ,13 during 
a program will have no immediate effect, but if an 
input statement is used or the program is terminated 
by a STOP, END, or an error, the computer keeps 
entering returns. 

The way in which a line may be entered into a 
program is very easy. First, clear the screen. If you 
don't want the user to see what is added to the 
program POKE 709,148 which sets the character 
color to that of the backgrourig in graphics mode 0. 
Second, POSITION the cursor at 2,3 by doing 3 
PRINTS or by using the POSITION statement. Then 
PRINT the new statements that you want to add to 
the program, followed on the next line by the word 
CONT. The fourth step is to POSITION the cursor 
at 0,0 and POKE 842,13 and STOP the program. 
Lastly, POKE ICAXl back to 12, clear the screen, 
and restore the character color by POKEing 709,202 
if need be. When the program executes the STOP 
statement the cursor will go down the screen and 
enter the lines you had printed until the CONT is 
encountered and then the program will resume to 
execute the last few statements. That's all there is to 



game, the computer will try to guess the player's 
animal by asking yes/no questions. If the computer 
is wrong in its final guess it asks the player about his 
animal and adds this new animal to its data 
statements. ICAXl is used to add the new animal to 
its list. After the questions are asked, the character 
color is turned off, the information is PRINTed and 
the lines are added using ICAXl then the character 
color is restored. 

My data base is fairly simple. Line number 1000 
holds two numbers. The first is the next empty line 
for a new question data statement. Lines 1001 
through 9999 hold all the questions. The first part of 
these date lines is the question itself. The next 
number is the line for the computer to go to if the 
answer to the question is yes. A negative number 
means the computer is going to guess the animal at 
that line number. A positive number means that the 
computer will ask the question at that line number. 
The last number on the question data line tells where 
the computer will go on a "no" response to the 
question. It uses the same procedure as the "yes" 
number does. Data lines 10001 through 19999 hold 
the new animals as they are added. Figure 1 shows 
what the first addition of a turtle might look like. 

FIGURE 1 



BEFORE 



A SPARROW 



YES 



DOES IT HAVE WINGS 



NO 



A HOUSE CAT 



It. 



My program plays a game called Animal. In this 



1000 DATA 1002, 10002 

1001 DATA DOES IT HAVE WINGS, 
40000, 40001 

10000 DATA A SPARROW 

10001 DATA A HOUSE CAT 
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AFTER 



A SPARROW 



DOES IT HAVE WINGS, 



YES 



NO 



A TURTLE 



"DOES IT HAVE A SHELL 



YES 



NO 



A HOUSE CAT 



1000 DATA 1003, 10003 

1001 DATA DOES IT HAVE WINGS, 
10000,1002 

1002 DATA DOES IT HAVE A SHELL, 
40001,40002 

10000 DATA A SPARROW 

10001 DATA A HOUSE CAT 

10002 DATA A TURTLE 



1$, 11$ Inputs from the player. 

QL Open line for the next question data 

line. 
AL Open line for the next animal data line. 

OL On line: Line from which the question 

came. 
NL New line for the computers final guess. 

A, B, C Temporary storage variables. 



LINES DESCRIPTION 

10-50 These lines initialize the strings and give 

the instructions. 
60-110 These lines initialize the variables for 

each new animal. 
120-160 These lines print out the question and 

set up for the next question. 
170-180 Prints out the computer's final guess. 
190-290 Computer wins and end game routines. 
300-340 Gets information about the new animal. 
350 Prints new animal data statement. 

360-390 Alters the previous question statement 

to also point to the new statement. 
400-420 PRINT new question statement. 
430 PRINT locations for next question and 

next animal respectively. 
440-470 Use ICAXl to add the statements and 

go to the play again routine. 
480-500 List all the animals known by the 

computer. 
1000 Data line for the next empty line for an 

added question and animal statement. 
1001-9999 Question statements. Negative num- 
bers are lines for the computer to guess 

at. Positive numbers are lines for the 

next question. 
10001-19999 The animal data statements. 

Variables Description 

A$,A1$ Animal names. 



Q$, 0,1$ Questions. 



This game is very simple and fits in less than 8K, 
but it is a good example of the use of ICAXl. I 
suggest that you leave out the POKE 709,0 on line 
350 and the clear screen on line 470 when you first 
try the program so that you can see exactly what has 
been added to the data statements. ICAX 1 could also 
be used to make data statements for a conventional 
data file. Record keeping, inventory, and a calendar 
are other programs that might use this location for 
their data base. ICAX 1 is simple to use and can add a 
tremendous amount of file capability for cassette 
users. It also lets the computer do more work 
without user intervention. I hope that these in- 
structions will help you use your computer to do 
more than it ever did before. D 



10 5ETC0L0R 2,0,0 

20 ? "Hi ANINOL-:-' :? -.-f 

30 ? " In this gaHe, you will think 
of an":? "aniMal and I will ask you YE 

5/MO" 

40 f "questions in trying to guess wha 

t youraniMal is.":? :? :? :? 

50 DIM fl5t30J,ftlSt301,QSC75),QlS(75>,I 

S(l) ,I1SC1J 

60 ? "Have you thought of an aniMal"; : 

IWPUT IS 

70 IF IS="L" THEN 480 

80 IF IS="M" THEM 60 

90 IF IS<>"V" THEM ? "Please answer YE 

5 or N0.":G0T0 60 

100 0L=ie01: RESTORE 

110 READ aL,<»L:? :? ;? 

120 RESTORE OL:READ QS:? Q$;:IMPUT IS 

138 IF IS="N" THEM READ ML:GOTO 150 

140 IF IS<>"Y" THEM ? "Please answer Y 

ES or NO.": GOTO 120 

150 READ NL 

160 IF NL>0 THEN 0L=HL:G0T0 120 
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170 RESTORE ABStNL):REOD fl$;? "15 IT " 

Jfti; -.IMPUT IIS 

188 IF I1S<>"V THEN 388 

198 ? "Great! I guessed your aniMal."; 

? ! ? 

288 ? "Mould you like to play again":: 

IMPUT lis 

210 IF IlS="V" THEM ? "K":GOTO 68 

228 IF I15<>"M" THEM ? "Please answer 

Y S or HO,": GOTO 280 

230 ? :? :? "O.K. Please rewind the ta 

pe and press":? "both play and record 

on the recorder" 

240 ? "Haue you done this";:lMPUT IS 

250 IF IS="N" THEM 248 

268 IF IS<>"V" THEM ? "Please answer Y 

E5 or NO. ":GOTO 240 

278 POKE 764,18:CSfiUE 

280 ? :? :? "Thank you for playing." 

298 EMD 

308 IF I1S<>"N" THEN ? "Please answer 

V 5 or MB.": GOTO 178 

318 ? "What was your aninal"; :INPUT ftl 

328 ? "What is a good question to tell 

":? ftS;" froM ";ftlS::lMPUT QlS 

338 ? "ftnd for ";fllS;" the answer woul 

d be"; :IMPUT IlS 

348 IF IlS<>"V" OMD IlS<>"M" THEN ? "A 

11 questions must hage YE5 or MO":? "a 

nsers. Re-enter the question" :GOTO 320 

350 ? "H":POKE 789,0:? :? :? ftL;" DftTfl 

";fllS 
368 RESTORE OL : READ QS:READ fl,B 
370 ? OL:" DftTfi "jQS;","; 
380 IF IS="Y" THEM ? OL ; ", "; B : C=« : GOTO 

400 



398 ? fl;",";OL:C=B 

488 ? OLj" DrtTft "JOIS;","; 

418 IF I1S="Y" THEM ? -ftL ; ", "; C : GOTO 4 

38 

428 ? C;",";-ftL 

438 ? "1088 DftTO " ; OL+1; ", "; flL+1 

448 ' "CONT" 

450 POSITION 0,0:POKE 842,13:5T0P 

468 POKE 842,12:P0KE 789,282 

478 ? "«":? :? :? "Thank you for the i 

nfoTHation. I will":? "reMenber that." 

:? :? :GOTO 200 

488 RESTORE 10808 :TROP 580 

498 READ ftS : ? aS:GOTO 498 

588 GOTO 60 

1800 DftTA 1082,18807 

1081 DATA DOES IT HAUE WINGS , -10008,-1 

8801 

18806 DATA A SPARROW 

18001 DATA A HOUSE CAT 



D:CHECK DATA (see p. 29) 

10 DATA 281,706,972,383,373,453,699,52 

9,993,788,934,858,308,71,559,8811 

168 DATA 12,882,857,983,925,45,477,245 

,484,785,29,670,896,170,658,8838 

318 DATA 465,171,143,290,105,413,897,1 

81,86,943,929,684,540,693,294,6834 

468 DATA 675,303,437,998,498,237,193,7 

55,844,4948 



COMING IN 

A.N.A.L,O.G, 

COMPUTING NO. 10... 

ADVENTURE! 

In the next issue of A.N.A.L.O.G. we will be 
featuring Adventure games, among the first 
games ever written for any computer, including 
the ATARI. We will be reviewing all of the 
major adventure games available for the ATARI 
and we will also be featuring a do-it-yourself 
adventure game! Other games include an as- 
sembly-language game by Tom Hudson, author 
of "Graphic Violence," A.N.A.L.O.G. No. 8. 

More games, more tutorials and more utili- 
ties will be coming your way in A.N.A.L.O.G. 
Computing No. 10, the original ATARI-only 
magazine! 
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HAVE A 
MERRY ATARr CHRISTMAS 
AND A BUG-FREE NEW YEAR! 

Let Wiley's friendly microcomputer paperbacks 
help you get the most from your ATARI. 



ATARI® BASIC 

Bob Albrecht, LeRoy Finkel, & Jerald Brown 

"May be the finest introduction to BASIC 
programming I have ever seen'." —Microcomput- 
ing "If you are serious about creating your own 
programs, you'll want ATARI BASIC by Bob 
Albrecht et a\."— Popular Computing 
333 pp. (1-06496-3) $10.95 



More than a million people have 
/earned to program, use and enjoy 
microcomputers with Wiley friendly, 
affordable paperback guides. Look 
for them all at your favorite book- 
shop or computer store. 



ATARI® SOUND AND GRAPHICS 

Herb Moore, Judy Lower, & Bob Albrecht 

Learn how to compose and play melodies, 
draw cartoons, create games, and combine 
animation and sound — even if you have no 
previous computer experience! This unique, 
self-paced manual takes you step by step 
through easy-to-learn techniques for creating 
sound and graphics on the ATARI 400 and 
ATARI 800. 234 pp. (1-09593-1) $9.95 
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6502 ASSEMBLY LANGUAGE 
PROGRAMMING 

Judi N. Fernandez, Donna N. Tabler, 
& Ruth Ashley 

For the programming "wiz" on your Christmas 
list, this self-instructional guide shows how to 
write faster, more efficient programs for the 
ATARI using 6502 assembly language. Hun- 
dreds of practice exercises in coding typical 
routines, plus scores of sample programs, 
help users master routine operations, condi- 
tional commands, assembly language logic, 
stack routines, and much more. 256 pp. 
(1-86120-0) $12.95 



JOHN WILEY & SONS, Inc. 

605 Third Avenue, New York, N.Y. 10158 

In Canada: 22 Worcester Road, Rexdale, Ontario M9W ILl 



3-9466 



OTHER WORLDS 



(FOR EXPERIENCED ADVENTURERS ONLY!) 




by Jvym Pearson 

You've sensed it before: nameless, unreasoning fear. Fear of Ifie unseiM 

of tilings that scurry and scrabble through the shadows when the light:, havt^ 

been put out. How then will you fare when you face the Ultimate Evil; how will you 

possibly survive — THE CURSE OF CROWLEY MANOR? 

Jyym Pearson, author of ESCAPE FROM TRAAM and many other fine pro- 
grams, explores a new dimension in fright with a macabre tale of things thai go 
bump in the night. THE CURSE OF CROWLEY MANOR is an excursion into mind- 
wrenching terror as you enter the dreaded Crowley Estate in search of answers to 
some pretty grisly questions. Fear fans take note; This is the stuff that 
nightmares are made of, so think twice before you approach. . . 

THE CURSE OF CROWLEY MANOR features Adventuring the way YOU iilu? 
it, with plenty of clever plot twists, and a scenario that'll roll your socks up and 
down your legs! If Adventuring has become a bit tame for you lately, this is one 
sure-fire cure! THE CURSE OF CROWLEY MANOR will run on any ATARI 400 or 
800 with ample memory. We supply the software; you supply the atmosphere. 
(A well-lit room is optional, but recommended!) 



ATARI 16K TAPE 050-0108 



$24,95 
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by Jyym Pearson 

As soon as your small space cruiser began losing altitude, you knew you 
were in for serious trouble. You somehow walked away from a fiery landing that 
would've spelled certain death for a less fortunate man, but as one may quickly 
learn, there are fates far worse than a rapid death. . . 

You've managed to walk away intact from the awesome Curse of Crowley 
Manor. So far, so good. But wilj even your finely tuned Adventuring skills give you 
the necessary edge to . . . ESCAPE FROM TRAAM? 

ESCAPE FROM TRAAM is a detailed Adventure for the ATARI 400 or 800 
computer that defies the player to successfully search a bizarre alien world for a 
means of escape. The perils are many and the opportunities for survival are few. 
But for the clever Adventurer, a single opportunity is all that might be needed for 
a speedy exit from this hellish world. Are you up to the challenge? 

All of the traditional Adventure elements are in ESCAPE FROM TRAAM, 
including two-world command Input, game save feature, and an extensive 
vocabulary. Add to this the impact of a dynamic storyline that'll give even the 
most experienced Adventurer a real workout! ESCAPE FROM TRAAM — a fine 
addition to any Adventure collection. 
ATARI 16K TAPE 050-0109 $24.95 



To order, see your local dealer. If he does not have the program, then call 
1 •800-327-71 72 (orders only please) or write for our free catalog. 

Published by ADVENTURE INTERNATIONAL 

a subsidiary of Scott Adams, Inc. 
BOX 3435 • LONGWOOD, FL 32750 • (305) 830-8194 



IflOKMUFFY, 
ACOMPUIiRGAMi 
FOR US!" 
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Good Golly! What A GAME! 

The original arcade game PREPPIE! wili give you hours of toe-ticl<ling fun. You tal^e the controls, moving your young 
prepster about on the golf course. And what a golf course! It's unlike any you have ever played on before. There are dangers 
everywhere, and only you can keep the little Ivy Leaguer from a fate worse then Penn State! 

PREPPIE! is written in state-of-the-art machine language, is joystick compatible and fully utilizes the Atari's sound and 

graphics capabilities. Quite frankly, it will give you the most fun you can have on an Atari microcomputer. , , 

DDCDDici ■ •, u, w ...,-. ^ ..^ IATARI16K TAPE -$29.95 

PREPPIE! IS available at fine computer, book, and hobby stores everywhere. 

An exclusive game from 



ATARI 32K DISK - $29.95 
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To order, see your local dealer. If he does not 
have the program you want, then call 
1-800-327-7172 (orders only) or write for our 
free catalog. 

Published by ADVENTURE INTERNATIONAL 

a division of Scott Adams, Inc. 
BOX 3435 • LONGWOOD, FL 32750 • (305) 862-6917 



"My Atari never did things llkettiis before!" 
— Holister Townsend Wolfe 

"I fiad so much fun I almost blew my 
doughnuts." 

— Theodore Boston III 

"I haven't had this much fun since Buffy 
and I went to Princeton for the weekend." 
— Martha Vineyard 
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FROGG€Pl runsoh any 48K flPPLe II uuith 
.i,, pOS 3.3 or flTflRI 400/800 uuith 32K 
"'^x^^'xfacrd Diskdrive , 1 6K ond cassette. 

Frogger is Qvailcible Por $34.95 ot your 
local computer store or order 
■^ ' directly from ., . 



Rll orders bu VISA, Mastercard, check or COD. fidd One do 



shipping. California residents please include 6% sale's 
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5 Muidg$ flinch Rd., Coorsegold, Cfl 93614 



® and TM designates a trodemqrh 'of 
Sega enterprises, Inc. .'jj 

"■■©■ l,982,Sega enterprises, Jnci 



WHEN YOU SIT DOWN TO A 
SCOTT ADAMS' GBAPHIC ADVENTURE 
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That's right — anything can happen, and it usually 
does! Because with a Scott Adams Graphic Adventure, the 
fantastic is as close as your computer — and your own 
fertile imagination. Each S.A.G.A. features the finest in hi- 
resoiution graphics — graphics which compliment and 
enhance the classic text — and, they can be toggled on or 
off with a single keystroke, too. Plus, optional Votrax Type 
'N Talk''^'*^ and printer compatibility give you the flexibility to 
add new dimensions to your Adventuring — when you're 
ready. 

The incomparable S.A.G.A. Series — experience the 
magic yourself. But be prepared for anything. 



S.A.G.A. #1 — Adventureland (Skill Level: Moderate) T^ T-? 
APPLE 2 PLUS 48K Disk (DOS 3.3 req.) . . 042-0201: $39i95 - ". 

ATARI 48K Disk 052-0201 $39;'" ' ' 

S.A.G.A. #2 — Pirate Adventure (Skill Level: B^gfrfne^^- 
APPLE 2 PLUS 48K Disk (DOS 3.3 req.) . . 042-0202 $39.95 

ATARI 48K Disk 052-0202 $39.95 

S.A.G.A. #3 — Mission Impossible (Skill Level: Advanced) 
APPLE 2 PLUS 48K Disk (DOS 3.3 req.) . . 042-0203 $39.95 

ATARI 48K Disk 052-0203 $39.95 

S.A.G.A. #6 — Strange Odyssey (Skill Level: Moderate) 
APPLE 2 PLUS 48K Disk (DOS 3.3 req.) . . 042-0206 $39.95 
ATARI 48K Disk 052-0206 $39.95 



Also, look for the Scott Adams Text 

Adventure Series on ttiese fine computers: 

TRS-80 • CGMIVIODORE VIC • NEC PC-8fl01 

.Trr'«-»,c:..,Mcjp,UMENTS 99/4 • CP/M Z-80 
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PRICES SUBJECT TO CHANGE 
To order, see your local dealer. If he does not have the program, then call 
1.800-327-7172 (orders only please) or write for our free catalog. 
Published by ADVENTURE INTERNATIONAL 



Published by ADVENTURE INTERNATIONAL 

a subsidiary of Sco.tl Adams, Inc. ' 

OX 3435 • LONGWOOD, FL 32750 • (305) 830-8194 
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